: 
ا‎ : ۰ E : ا‎ : : 
1 : I: ر‎ ۴ jT FPF 
1 ii red! 1 کک ا ?5 ار‎ ۰ 1 
/ U 


2 . 
سے 


I 
0 E E 
EE ۰ 
چچ‎ ESS 
O OS 


م 
ا 

ا 

ا 
PSPSPS‏ 
PPPS PPPS‏ 
PPP PPPS‏ 
PPPS‏ 
EEE‏ 


E ST r 

و 0 0 | . 

: مغر ھ97 له ھر 

2 

1 م ر ۸ 
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' Example 8 - 'do while/loop' recursion ste 
'Dim i As Integer = 0 
‘Do While i < Integer.Parse(TextBox1.Text) 
: i += 1 

: 'ji=i+1 

"Loop 

‘MessageBox. Show("The final value was: 


ComboBoxT: 
"End If 


 # Example 2 اسك ۳ | ا‎ - Li 
' "'e]se' state 


' Example 9 - combining array and branching st DboBo: 
'Dim myArray() As String = {“دnzi"‎ . : 


3 © Private Sub E 

ج 

5 °° Exam nt syntax 

6 "IF Cor 

7 #َ . "( 

8 : Co 

9 "End If 

10 ' Example 10 - recursion and branching combined 
11 "®" Exar tatements, Dim i As Integer 

12 ' ""e1s For i = © To ListBox1.SelectedItems.Count = 1 
13 'IFf Select Case ListBox1.SelectedItems(i) .ToString() 
14 I en 


"كمبيوتر مكتبى" عة 


MessageBox. Show("جمzganna—ط‎ ترتخZخا ("لقد‎ MessageBox. Show(" رتويıمفگ"‎ ( 
Else Case "تقال"‎ 
Message8ox.Show("mراlيتëaخۍخا "لست متأكدا مهن‎ (8٤ MessageBox. Show(" Jiقن")‎ 
End If )Cھ5ع "محمول"‎ 
"Else MessageBox. Show(" Janz") 
MessageBox. Show("sıaan ("“لقد اخۍترت‎ Case “"إضافات"‎ 
"End If 


MessageBox. Show("تIفlض!‎ ") 
End Select 
Next 


' Example 3 - case/select branching statement 


11 لے اب ا CU‏ 


بسم الله الرحمن الرحيم 


يسعد مدونة الجوهريزم أن تقدم pJ‏ تب" Microsoft Visual Basic 2010 Express‏ 
دليل للمبتدئين جدا" »فما هو إلا ملخص و ترجمة لبعض المواد التعليمية الخاصة بتعليم لغة 
العاوة8 اعدء۷ حيث اقتصر دورى على ترجمة و توضيح بعض المواد الأجنبية و العربية و 
تنقيتها لتناسب المستخدم العربى المبتدئ فى البرمجةء و قد روعى عند اختيارشرح هذه اللغة أنها 
سهلة و تقترب فى أوامرها من اللغة الانجليزية » و روعى أيضا ترجمة المفاهيم الانجليزية الصعبة 
بلغة عربية مع أمثلة لتوضيح المعنى. 

هذا الدليل مقدم للمبتدئ من الصفر فى لغة البرمجة › فالدليل لا يبدأ كما تبدأ معظم الكتب و 
إنما يبدأ بإنشاء برنامج دون معرفة أى قواعد عن اللغة ثم نتطرق من خلال هذا البرنامج فى شرح 
بعض المقومات و المفاهيم الأساسية فى لغة العأوهط اهuءأ۷.‏ 


استخدمنا فی الشرح برنامج 2010 Microsoft Visuaا Studio عEx×م ress‏ و هو مجانى و 
يمكنك تنزیله من : 


Sa aA Ra mR mR mR mR mA ma ma mM mM RA RA 


۱ 
۱ 
۱ 
۱ 
۱ 
۱ 
۱ 
۱ 
۱ 
۱ 
۱ 
۱ 
۱ 
۱ 


http://www.microsoft.com/express/ Downloads 


و أخيرا أرجو أن يكون عملا مفيدا و نيتى الإفادة » و كل ما أتمناه دعوة صالحة لظهر الغيب 
> و يمكنم التواصل عن طريق : 


http://algoharism.blogspot.com :igدnئl‎ 


0a4 ۰ 


صفحة llلفيس‏ ڊوك: http://www.facebook.com/algoharism‏ 
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6.تدریب 
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6 خراج البرنامج مستقل 


الملحقات 


O O 


eos E E E ea a RSE SR aaa 


Microsoft 
VB Express 
2010 للمبتدئين‎ 


الدرس الأول 
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الدرس الأول يتضمن مقدمة سريعة لواجهة التشغيل و 


انشاء و حفظ أول مشرو ع W0‏ 0اا٥۲.‏ 
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1. Start menu >> Programs >> Microsoft Visual Studio 2010 Express >> Microsoft Visual Basic 


2010 Express 
2. New Project... مشروع جدید‎ 
3. Windows Forms Application انشاء برنامج يستخدم النوافذ‎ 


النافذة الرئيسية للبرنامج .4 


Microsoft Office ۴ 
Microsoft Silverlight ۴ 
Microsoft Visual Studio 2010 Express Lêl Microsoft Visual Basic 2010 Express 
Miraîcan V6.3 (SOO0O series] F ğ Try Visual Studio 2010 Professional 
Mobile Witch Remote Control 
Mozilla Firefox 
Nokia 
Orbit 
Real Alternative 
Scribus 1.3.3.14 
Startup 
Windows Liwe 
WinRAR 
Yahoo! Messenger 
Applian FLV Player 
Internet Explorer 
Search MediaDirect 
5. Windows Calendar 
@ Help and Support E hr onlar 
E Bun... tl Windows Defender 
gš Windows Live Messenger 
0 E Ë| Windows Live Movie Maker 
5 [E Windows Live Fhoto Gallery 
0 E Uocurmenteê - MIC ۳ُ Windows Mail 


1 Default Programs 


Windows Update 


Programs 


Documents 


FF E E o a E o o o ey 


Settings 


س اتات ات ا ا ات اا ا ا ا ا 


| Windows Vista™ 


Start Page - Microsoft Visual Basic #010 Express 
File Edit View Debug Iools Window Help 


EB. الا ادد # | طا‎ 2 |e 


Micrpsoftr 
CGO Visual Basic 2010 Express 


: Get Started Latest News 
TÛ Mew Project... j 


1 pen Project... 


Welcome Learn Upgrade 


Recent Projects 


El HelloWorld 


Llose page after project load 
Show page on startup 
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sort by: | f Search Installed Templates 
erer م‎ Type: Visual Basi 
- : که‎ Windows Forms Application Visual Basic e 
Pe: 


Ã project for creating an application with a 
n Na Windows user Interface 
Online Templates {ap | WPF Application Visual Basic 


= Lonsole Application Visual Basic 


اس 
Llass Library Visual Basic‏ 


WPF Browser Application Visual Basic 


WindowsApplicationl 


WindowsApplıcationl - Microsoft Visual Basic 2Û1Û Express 
File Edit View Project Debug Data JIools Window Help 


EE CEE IE 


oç 232 


HEH 
IZA My Project 
la] Forml.wb 


Properties 


XOq|OO | îy 3321N 


Form System. Windows,Forms,.Ft 


2 
Font Microsoft Sans i 
ForeLolor O LontrolTex 
FormBorders SIzable 
RightToLeft No 

RightToLeftLi: False 

Text | 


Text 
The text associate’ 
control, 
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2. مكونات الصفحة الرئيسية 


فيها عند التقدم فى البرنامج. 


WindaowsApplicationl - Microsoft Visual Basic 2010 Express 
سد‎ 2 View لا ات لاد‎ Data ل‎ Window Help اظ المهام‎ 
a RR RRR - 29-e -| و‎ a EE RR > 
solution Explorer 
E EEAEE 


WindowsApplicationl‏ ا 
[aA] My Project‏ 
LS] Fornglgybtion Explorer‏ 


5 0 


XOQ[OO] x SIND 
is 


Properties 
Form] System. Windows,Forms,Ft ” 


Lursor Default ج‎ 
Font Microsoft Sans 
ForekLolor | Lontrollexn 
FormBorders SIzable 
RightToLeft No 

RightToLeftL: False 


1 - شريط المهام 


File Edit View Debug Data Jools Window Help 
7ك ك:‎ WR ا8ك‎ | 2|0 -@ -|* a HHR RE 8 + 


Project 


يكون فى أعلى الصفحة و يمكنك من القيام بجميع خصائص البرنامج 
Solution Explorer - 2‏ 


يكون فى الجانب الأيمن من الصفحة و يوضح لك العناصر و الكائنات المستخدمة فى المشروع الخاص بك 
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| a Sl EE 


(El WindowsApplication1 
aA) My Project 
C2] Forml.wb 


Properties الخصائص‎ - 3 


يعرض خصائص و مميزات الكائن (سواء زر ٠‏ قائمة ... إلخ) و يكون فى الجانب الأيمن فى الأسفل 


Properties 
Forml System. Windows.Forms,Fc 


Default ج‎ 
Þ Font Microsoft Sans i 
Forekolor SS Lontrol Tex 
FormnBorders: SIizable 

RightToLeft No 
RightT oLeftLi False 
Text Forml 


Cursor 


Text 


The text associated with the 
control. 


4 - صندوق الأدوات 


و هو كصندوق العدد حيث يوفر لك جميع الأدوات التى ستحتاجها خلال التصميم المرئى و يكون فى الجانب الأيسر 


> All Windows Forrrs 


Heq 


k Common Controls 


. 


aA IIMA 


2 UONEAIES 


sa2ın0§ BFE 


Pointer 
FlowLayoutPanel 
ûroupBox 


001 


Farnel 
SplıtLontalner 
Tabkontroal 


M1 


ار 
اا 

| 
ت‎ 
E 

e 
السا‎ 


TableLayoutPanel 


a Menus & Toolbars 
lk Pointer 
LontextMenuStrip 


MenuStrip 
StatusStrip 
ToolStrip 


ToolStripLontalner 


Folnter 
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5 - شاشة التصميم (مرئى | عن طريق كود البرمجة) 


و هو النافذة الرئيسية فى البرنامج 
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Hello world چaliرڊ‎ J.3 


سنتعمق آکثر فی مكونات الءأوھة8 امںء|۷ و ذلك من خلال برنامج افتتاحی عن طر يقه سنستكشف بعض المهارات 


WindowsApplicationl - Microsoft Visual Basic 2010 Express 
File Edit View Project Debug Data [ools Window Help 


TEE TLIEFETHEHE 


2 | TERIEE 
> Common Contra س ا‎ 
dl OntaINErS e ا‎ e 
Pointer ۰ l=] Formi.wb 
FlowLayoutPanel 
roupÊox 
Panel س‎ ۰ Properties 
SplitContainer Form1 System.Windows.Forms.Fc > 
TabControl ج‎ 
TableLayoutPanel 
إ‎ Microsoft Sans i 
et ۰ Forekolor SS LontrolTex 
ااا‎ FormBorderS Sizable 
Menubtrip ۰ RightToLeft No 
StatusStrip ۰ RightToLeftL: False 
ToolStrip أ‎ 
ToolStripLontainer 


: | The text associated with the 
Pointer control, 


1 -اشر (شاور) بالماوس على صندوق الأدوات ×هطامه . 
2 -من ءاCon†r0‏ onرصmصدC‏ اضغط واستمر فی الضغط علی Button n‏ 
3 -اسحبه و ضعه فى النافذة الرئيسية. 


| 

یمکنك ادخال ۸٥ا 8u‏ عن 
طریق ضغطتين متتا ليتين 
Double click‏ علy‏ ج 

. ر 

ّ .But 0٣ رمز‎ 

2 Button 
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File Edit View Project Debug [Uata [ools Window Help 
TEE E IE BEE IEE DEE EE EEECEEE 


Formlvb* x DE IE lU 


ERIEE 
HPublic Class Forml ا‎ 1 3E] WindowsApplication1 
EA My Project 
= Private Sub Button1 Click(ByvVal sender As System.Object, ByVal E] Forml.wb 


sa2ın05 E3 


End Sub 
End Class 


xaq| o00 | 2 


Properties rT I XX 


EINE | 


5 -اكتب فى مكان كتابة الكود 


MessageBox. Show ( "lڊبaرa‎ lq pllzll Hello World! ") 


WindowsApplicationl - Microsoft Visual Basıc A2010 Express 
File Edit View Project Debug Data IT Window Help 


sa21n0ڳ‎ E3 i 


APublic Class Forml | 8 WindowsApplicationl 
Al My Project 
= Private Sub Button1 Click{ByVal sender As System.Object, ByVal E] Forml.wb 
MessageBox. Show" pILxzil Lgıl Lızga Hello Morld!"; 
End Sub 
End Class 


xoq|001 $y 


Properties 
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Basic 2010 Express 


HPublic Class Forml 


sa31n0§ EE i 


E1 Private Sub Button1 Click(ByVal sender As System.Object, ByVal 


End Sub 
End Class 


FG. ا‎ 


ru 


Start Debugging (F5) 


| هربا أيها العالم‎ Hعاا0‎ World! 


| سسا 


اكا _-_ و ستعود إلى نافذة التصميم. 
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9 -لقد انتهینا من أول برنامج و نرید حفظ المشروع ۸|۱ م۷جS‏ << ما۴ 


File | Edit View Project Debug Data Format Tot 
New Project... Ctrl+Nl 


Open Project... Ctrl+ O 


û 2: Ê 


Open File... 

Addl ۴ 

Save Project 
Llose 

Î Close Project ) 

Name: اسم المشروع)‎ 
WH] Save Forml.wb Ctrl+% 3 س‎ 
آز‎ 


[المتان الذى ريد حط المشروع فيه] Save Forml.wb As... Location:‏ 


Export Template... Solution Name: اسم الصتروع)‎ Create directory for solution 
i Page Setup... 
y Print... Ctrl+P 
Recent Files ۴ 
Recent Projects and Solutions ۴ 
Exit Alt+ F4 
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۵ اصنع برنامج مکون من تلاثة ازرار ٣s‏ ں8 3 و بحيث عندما تضغط على الأول يظهر لك (لقد ضغط 
الأول) و عندما تضغط على الثانى يظهر لك (لقد ضغطت الثانى) و الثالث كذلك. 

ه عاين عمل البرنامج. 

ه احفظ المشروع باسم ١اه‏ هاام] فى مجلد المستندات. 
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Properties 1.الخضصاأئأفض‎ 


تحدثنا باختصار عن صندوق الخصائص و هو خاص بتجهيز الاعدادات المناسبة لكل أداة مستخدمة 
فى المشروع و الخصائص تعنى أساسا بالصفات الشكلية للأداة المستخدمة. 


Properties 

Buttonl System. Windows,Forms, ” 
Microsoft Sans 

ForeLolor ControlTer | 

Image | [nore] 

ImagqeÃAlıgqgn MıddleLenter 

Imagelndex | (none) 


Imagqekey | (none) 
ImageL Ist [none] 
Right oLeft 


| MıddleLenter 


The text associated with the 
control, 


لقد قمنا فی الدرس الأول بوضع زر ١٥اں8‏ و كتابة كود بسيط له»ء الآن سنتعامل مع بعض 
اص ا ا ا ا ا 
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File Edit View Project Debug Data Format Tools Window Help 
: ان‎ AR|IR| = 2|49 -@ *ض|-‎ a EES ATR FE AA + 


solution Explorer 
العا كا‎ 
lal My Project 
Properties 
Buttonl System. Windows,Forms., 


Image LÎ (none) E٣ 
ImagqeÃAlign MıiddleLenter 1 
Imagelndex Ll [none] 
Imagekey Ll (none) 
ImageList (none) 
RightToLeft 
Text 
TetÃlıgn 

Text 


Loc@ti0۸ -الموقع‎ 1 


و هى الخاصية التى تتعامل مع موقع (مكان) العنصر المستخدم › و 
تتكون من خاصيتين فر عيتين : × و ۷ (× يتعامل مع المسافة EI EE‏ 
الرأسية و ۷يتحكم فى المسافة الأفقية من الجانب الأيس)(انظر f Caamedtastalio) Troe ٠‏ 
الشكل التالى. Top, Left‏ ۳ 


اي 7ا ا 


Anchor 
AutoblzEe False 
AutoSızeMode GrowUnly 
Dock None 
FF Location 133: yb 
i 1335 
۷ 30 1 
 Margın TES 
5 Maxlmumblze Û: Û 4 
> Minimumblize Û: Û 


Location 


The coordinates of the upper-left corner 
of the control relative to the upper-left 
corner of Its container, 
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XOq|O0 | +x 
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WindowsApplicationd - Microsoft Visual Basic 2010 Express 
File Edit View Project Debug Uata Format Jools Window Help 
: إهاأهتات 4اش سا 7كا عالت‎ = 2|9 > -|* a STR E A > 


oç e3 


1 gy 0 


WausesValidatio True 


xoq|01 


Anchor Top, Left 
Autoblze False 
AutoSızeMode GrowÛnly 
Dock None 
| 4 Location 81:94 
| X 81 
94 
| E Margin H3 
E Maxımurmîize Û: Û 


> Miniımurm“size U: Û0 


Location 

| The coordinates of the upper-left corner 
of the control relative to the upper-left 
corner of Its container, 


2 اض )×1 
و هو خاص بتغيير النص المعرض على الزر. 


» Solution Funlarer 
Properties TOX, 
¬ Î Buttonl System.Windows.Forms.Button 


ImagqeÃlign MıddlekLenter 
magqelndex E [nore] 
Imagqekey ll (none) 
magıeL Ist (none) 
RightToLeft Mo 

Text Algoharism 
TetAÃlign MıddleLenter 
TextimageRelation Uwerlay 
LWseMnemonic True 
UseVisualstyleBackCol True 
WUseWaitCursor False 


Text 
| The text associated with the control, 
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3 لون لأف Backcolor‏ 


E ES ا‎ 


Properties 


ا 


۰ Accexahlefole Default 


BackColor LÎ 255: 128; 255 
BackgroundIimagie 

BackgqroundImageLayc Tile 

Cursor Default 

FlatAppearance 

Flatstyle Standard 

Font Microsoft Sans Serif: &#.25 
ForeLolor SS Lontrol Text 

Image | (none) 

ImagqeÃAlıqn MiıddleLenter 


The background color of the component. 


Î Properties 


| Default 


BackColor LÎ 255:128; 255 
BackgqroundImage [| (none) 
BackgqroundImageLayc Tile 

Lursor Default 
FlatAppearance 

Flatstyle Standard 
ForeColor E 0:0; 192 
Image 


ImageÃlıgn 


| The foreground color of this component, which Is 
used to display text. 


Font -الخ¡ھ‎ 5 


i aga" ¬ a a O U NTT O N 


Þ Microsoft Sans Serif; :8 
ForeColor E oa:0: 192 
Image | (none) 
ImagqeÃAlıgn MıddleLenter چ‎ 


Font 
The font used to display text In the control. 
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Properties 


)/4ہ٣ع( اسم الغصر‎ 6 
Buttonl System. Windows,.Forms,.Button 


] کل : علی اسح ى Visible True‏ 


(ApplıcatıonSettıngs) 

8 يمكناك e‏ اا“ کالآتی کک 
BtnOk‏ 

جيث يعنی هذا العنصر هو الزر الخاص (Name) Buttonl‏ 

ڍٍ)O‏ و ذلك أتسهيل معر فة نو ع العنصر و : GenerateMember True‏ 

Locked False و ظيفته.‎ 


Vocdifiers Friend 


LausesValidatlon True 


[Name] 
Indıcates the name used In code to Identify the object. 


ه لو كنت تملك أكثر من عنصر و تريد التنقل بينهم يمكنك استخدام قائمة العناصر من صندوق 


Form System. Wiındows.Forms.Form 
BtnAlgqoharism System. Windows.Forms,.Button 
BtnÛOk System. Windows.Forms.Button 

Forml System. Windows.Forms.Form 


(ApplicationSettings] 
(DataBındıngs]) 
Tag 


(Name) Form l 
Language (Default) 
Localızable False 
Lockecl False 


LausesValidatlon True 


(Name) 


Indicates the name used ın code to Identify the object. 
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2. اهم العناصر فى صندوق الأدو ات(الادو ات الشائعة) 


سنعرض أهم الأدوات و أكثرها شيوعا الموجودة و وظائفها من خلال واجهة برنامج خدمة عملاء . 


Toolbox 
> All Windows Forms 
a Lommon Lontrols 
Button 
LheckBox 
LheckedLIstBox 
LomboBox 
Date lirmePicker 
Label 
LınkLabel 
ListBox 
ListView 
Masked TextBox 
MonthLalendar 
NotifyIcon 
NumericllpDown 


PictureBox 


EA > Hl E 


IM ID 
13 


I I 


i 8 ا‎ 


Button ۴ 
Button )ڙر‎ 


صندوق التعليم LheckBox‏ 
(الاختيار) كل على حدة و أمامعا 


A abe‏ | يستخدم لعرض نصوص على النماذج لا يستطيع 
يستخدم لادخال نصوص من لوحة و هو يمكن تعديل 


a TextBOX‏ اثناء التشغيا 
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Radio button 


و هو يستخدم للاختيار بين عدة اختيارات و يصلح 


List Box‏ عندما یکون عدد الاختیارات کبیرا 


کے 


ComboBox‏ 3 |[ و هو يجمع بين ال ×0 8اا و ال ×ەطe×t‏ 7و ھو 
Combo Box‏ یستخدم للاختیار بین متعدد و يصلح عندما یکون عدد 


ه مثال على هذه الخيارات: مثال مشروع "خدمة العملاء": 
E aT‏ 


a Ford EO EEX 


\ListBoxî‏ المننج 


e _ 


۰ ذڪر النوع‎ 2 
Radio BOX | 2 EAE 
| Radio Box از لقا کالوج‎ Check BOX ١ : ١ 
Buttan Î Butan? 


سسس مها (’(”(—“(y‏ )ر لا 


2 اضافة معلومات الی ال چoط‏ oطbہ٥C.‏ 


ei هده اا‎ ll Combo box ا غا‎ ٠» ۾‎ | e 


OE E Combiners Tasks 
و‎ Ke DG 


mr | Unbound Mode 
jst Bax 2 e. 
Edit Itefis... Edit Items ستظهر نأفده فیها‎ © 
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String Collection Editor 


String Collection Editor 


Enter the strings In the collection (one per line]: 
سد‎ 

مدر 

آالجوشری 


"= س‎ 2 
SL FF E i 
EE ESS 


O u 


Unbound Mode 
Edit Ierms... 
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3.اهم العناصر فى صندوق الأدوات(أدوات القائمة و صندوق 
الأدوات) 
سنعر ص يعص أهم الأدوات و ھی كيفبة اأضافة قائمة menu‏ وڃ صندوقی أدوات ToolBox‏ 


للمشروع الخاص بك. 


Toolbox 

> All Windows Forms 

5 Lomrmoan Loantrols 

[» Lontalners 

2 Menus & Toolbars 
Pointer 
LontextMenubStrip 
MenuStrip 

E StatusStrip 

Toolstrip 
ToolstripLontalner 


ا 


Fointer 

Chart 
BindingNawIgator 
BindingqSource 
DataûridView 
[atašet 


EEE 
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الان مختصر لأهم الأدوات فى آدوات القائمة ثم سنعرض مثال علی کل عنصر : 


OTT TIPTITETTTIMRE WE TN 
SES may es 
لإإنشاء صندوقی ادوات‎ | B® ToolStrip Tool Strip 


۴ ت علدا | کک Fm‏ 2 


در ا لن 


ارسل کنالوج 
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EIT 
لأرل عنصر‎ 


ذگر ا النو 


ارسل کنالوج 


= MenuStripl 
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القائمة الأساسية 
فی نظام نوافد 
ویندور 
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Forml.wb™ 


نکر © 
ارسل کنالوچ 5| 


E 


af Form1 
File File Edit Tools 


[Z| SplitButtor 
DropDownButton 
Separator 
LomboBox 
TextBox 
ProgressBar 
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oolStripB 
False 

Lheckstate Unchecked 

DısplayStyle Image 

Font Segoe UI, Spt 

ForekLolor 3 Lontrol Text 

Image êl] System.Drawin{...| 

ImageAlign MiddleCenter 

ImageSšcalıng SızeEToFit 

ImageTransparentColo Magenta 

RightToLeft No 

RightToLeftAutoMirror. False 

Text TooStripButtonl 

TextAlic Mıiddlekenter 

Image 

The image that will be displayed on the Item. 


[ 


Edit Tools 


| ل ا ا 


ذكر ( ان 


ارسل کنالرج 


4 


MenuStrip1 E ToolStrip1 kz StatusStrip1 
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4.نصائح فی تصميم واجهه المشاريع 
إلى أفضل الطرق المتبعة فى التصميم و طرق تسهل الوصول إلى معلومات و تسهل قراءة واجهة 
البرنامج على المستخدم النهائى (المعنى باستخدام البرنامج). 


ه سنبداً بأفضل الطرق لتصميم واجهة البرنامج: 
1 -فكر بطر يقة "الأعمدة و الصفوف'"": 


û2. Creating a Windows Application User Interface 


a "think columns and rows" Text Boxes 


عمو د ايمر کر — 
i ChanneLProperties 04‏ عمود ايسر 


Buttons 
ركن أيمن سفلى‎ 


11 
e 


LearmYisualStudio.NET 


أى من الأفضل أن تكرن واعمطج] فى عمود واحد على اليسار و العناصر التى تحتوى على إدخال 
بیانات فی عمود على الیمین و الأزرار ٣ه††ںع‏ التى ستقوم بفعل أو وظيفة تكون فى الركن اليمين 


ا ا ا ا اا ا ا ا ا اک ا ا 
مكتوبة بالعربية راعى تغيير اليسار إلى اليمين و العكس فى الاتجاهات. 
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2 -عند كتابة البيانات فى واجهة البرنامج راعى سهولة و وضوح هذه البيانات (مثال إذا أردت أن 
تجعل ۸٥†ںط‏ لتأکید الاختیار فلا تجعل تسمیته "اذهب" فلتجعله بسیطا ک" موافق") › لا 
تجعل المستخدم النهائى يحتار فى معانى و وظائف العناصر المعروضة. 

3 -استخدم الألوان و الأساليب المتعارف عليها فى تصميم البرامج و فى إدخال البيانات حتى لا 
يحتار المستخدم النھائی و لا تصعب علیھ الموقف (متال لا تختار مثلا للزر ۸١٥٤اںط‏ لون 


أسود). 


٠‏ انتھینا من بعض النصائح فی تصمیم› و سنعرض فی التالی نصائح تسھل للمستخدم النھائی 
الوصول الى المعلومة و ادخال البيانات: 
Tab key- 1‏ 


هل جربت استخدام زر طهآ من لوحة المفاتيح للتنقل بين الوم×ه8 ٥×‏ فى البرامج دون استخدام 


م مثال على استخدام اھ۲ الانتقال بين عناصر الادخال المختلفة٠‏ 
1 ۔اضغط علی زر gعںطbعD‏ . م yT‏ الأدوات فى الأعلى) أو اضغط على 
5 فى لوحة المفاتيح. 
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Edit  JIools Help 


ذگر () 


ارسل کنالوج 


Edit Tools Help 
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WindowsApplıcatıon2 - Microsoft Visual Basıc 2010 Express 


CAT 17 miart Fold B8 hy urn 
CEL 1 IE 1 TT IF ۳ ا‎ LL االات‎ E ا ا ا‎ 1 


Designer 
Solution Explorer 
Database Explorer Ctrl+ Alt+5 


0| 


8 1 | 0 


Object Browser F2 

Error List Ctrl-W, Ctrl+E 
Start Page 

Toolbox Ctrl+Alt+X 
Other Windows 


saaınoş ee 
# FW] eê E F 2ı H E 


Toolbars 
Full Screen 


Properties Window 
Property Pages 


. Form wb 


File Edit Tools 


الرس الثانى الأدوات الأكثر شيو عاو تصميم واجهة المشروع 35 


algoharism.blogspot.com Microsoft Visual Basic 2010 Express| J مقدمة‎ 


File Edit Tools 


:LayoutToolbar- 2‏ 
و هو شريط أدوات يتيح لك تنظيم عناصر العرض و يسهل عملية الترتيب المرئى و محاذاتها. 


لإظھار شریط آدوات اںمرھ| افتح قlئnة‏ viewف toolbars‏ ف layout‏ 


ndow Help 


2 ۴ 7 iF NE TE م‎ ٌ TT ت 1 ا 4+ ج4‎ 3 2: G+ 1 =) 5 ۳ ل‎ E 
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File File Edit Tools Help الاو غ ر اا‎ 


خط المربع الأبيض ¢ 
سیتم محاداة بقية العناصر 
ل فصر 


ا اک 


pa ۰‏ 1 للل المربعات السوداء ٤‏ 


سيتم محاذاة هذه العناصر 
على يسار العنصر 
ارسل کنالوج | | الموسوم بالمربع الأبيض 
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Form yb 


Edit Tools Help 


لاحظ محاذاة جمیع 
العناصر على يسار 
العنصر الموسوم بالمربع 


بالابيض 
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5 .دريب 


عنوانه و طريقة الدفع ( ١۲ء‏ امعم » كاش » شيك) › و اجعل الترتيب الانتقال بين الخانات ترتيبا 
منطقیا ٣(‏ ل۲ہ اھ٣).‏ 
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Microsoft 
VB Express 
2010 للمبتدئين‎ 


الدرس الثالث 


algoharism.blogspot.com 


الدرس التالث ستاعرف فيه على مقدمة لكيفية كتابة الكود 
و ما هھ Eventsll‏ و أهم خصائص الواہعvعE‏ 
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Events| jع 1.مقدم‎ 


ستتعرف آكثر فى هذا الدرس عن ول خطرة فى تاب الشفرة البرمجية ( لكر الخاص بابر تامج 
حیث يصمم عا م×ع Basic‏ ا۷isuaبرامج‏ تعرف ب " برامج تعتمد على حدث" “Event Driven‏ 
.Programs”‏ 


يكون هذا الحدث ۲٣٥۷ع‏ متلا ضغطة زر أو تغيير من برنامج آخر أو من الويندوز نفسه » و يكون 
البرنامجج مصمم إما أن ستجيب أو يتجاهل هذا الحدث. 


ه مثال: مشروع "مرحبا ايها العالم ك|هW‏ اام" المشروح فى الدرس الأول: 


E] HelloWorld - Microsoft Visual Basic 2010 Express 
File Edit View Project Build Debug Data Format JIools Window Help 
اك اهاد 4 اك ليا ك لن‎ > 2 © E ا‎ 7 
HIE = | e LIF FE FF | e 2 }ك‎ e+ e+ | ف |[ ]ع‎ | + 
Formi.wb Formi.wb [Design] %# y Solution Explorer 
ك ا لق لف ا‎ 
a E, El HelloWorld 


A] My Project 
=] Forml.wb 


2 


sa2ına5 eq Û xoq|oo | 


Properties 
Form1l ستاب‎ "Windows,Forms,Fo = 


pren False 
Transparency Ll 


a HelloWorld - Microsoft Visual Basic 2010 Express 
File Edit View Project Build Debug ÛOata Iools Window Help 


AEA RIN BAIR = 2|0. << P u a SEs, 


es Forml.wb [Des ا‎ y Solution Ex لقاش‎ 


Em Class Forml — a Hello World 
=A) My Project 
- Private Sub Button1_ Click(ByVal sender [2] Forml.wb 
MessageBox. Show("Hellow world" } 


End Sub 
End Class 


sa21no05 Feq ll xoqool 


2 -سنجد الكود الآتى: و من خلاله سنعرف على بعض الأساسيات فى التكو يد 
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:Button 1‏ ای أن العنصر 1 ١٥٤†ں8B‏ ھو الذی سیتم 
التعامل معه 


End Sub JllPrivate Sub ja 1 یلإمںااic من ککھا€‎ 
Essa geBox .Show("Hellow wor lis 


gسam” Code Block‏ أو جزء کودی 

۰ Method 

الو حدذ ا 8 End Sub‏ و هو البناء المتخصص فى بناء الكود 
حده يه قى 

بناءِ الكود 


۴£Nd Cl‏ يسمى 


هم الاجراء الذى سیتم فة کر د غل )عا( الضغط ) 
علذى 1 Button‏ 


لتوضيح العملية أكثر: هى أن يوجد وحدة بنائية أساسية فی تصمیم الکود و ھی d٥ط†عe‏ ۷و یبدا من cناubم‏ 
ssاع‏ و ینتھی عند End Class‏ 

وهو یحتوی على وحدات أکثر تخصص و تسمى ب )ها8 ملهو هى الخاصة بعنصر أو كائن محدد و 
تحتوی هى بدورها على أصغر وحدة بنائية للکود و ھی فی مثالنا الحالی )عااZ€_۸1٥k)ں‏ 8و تعنی أننی أريد 
عند الضغط بالماوس )cااC‏ ( و ھو الحدث ٣٤‏ م۷ع) على 1 ۸٥t†ں8‏ سيتم إظهار Wهط؟‏ رسالة 
“Hello World” Jgaa MessageBox‏ ( و هو الرد Response‏ على الحدثٿClick‏ ( 


يمكنك التحول من نافذة التصميم إلى نافذة الكود عن طريق الضغط على 7 و العودة من 
نافذة الكود إلى نافذة التصميم عن طریق Shi ۴٤+۴7‏ 


- يمكنك تقليص عرض الكود عن طريق الضغط على علامة( - )بجانب الكود الذى تريد 


ا 
- بوضع مؤشر الماوس على الكود المخفى سيظهر فى نافذة فرعية كالاتى: 
Formil.wb "Ox‏ 


4 اا : 
: 


1Public Class Form1 


¥ 


Private Sub Buttonl_Click(ByVal sender As System.Object, ByVal e As System.EventArgs] Handles Button... 
MessageBox. Show(" Hellow world"}] 
End Sub 


Ln 4 
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2. كيف أكتب الكود؟ 


بعد أن وضحنا أين كتابة الكود و بعض أساسيات نافذة التكويد » سنوضح كيفية كتابة كود برمجى و 
ما هی الأوامر التى تستخدم فى كتابته. 


يجب أن تتذكر انه ليس عليك أن تحفظ المئات من الأوامر البرمجية للوصول إلى الكود المراد إنما 
يمكنك أن تصل و تكتب هذه الأوامر عن طريق طرق كثيرة منها نافذة الخصائص ع۲ ۵م۲0م 


HelloWarld - Microsoft Visual Basıc 23U10 Express 

File Edit View Project Build Debug Uata Jlools Window Help 

جا چ ا ل 33 > ©> و |ك - إل اهقح طاق ا 7 عالت : 

HE ة‎ AT FF dk |o FI E FF |e ¥ ¥ £ | 3 $ F | A | a 


Formi.wb [Design] 2% Ee Re 


r 


sa2ına5 E J xoqo0] 


lS SLE 
dl Form SEE (FÎ HelloWorld 
My Propect 
Formil.wb 


يمكنك الوصول إلى نافذة الأحداث 


Eve LontextMlenı‏ عن طریق الضغط علی 
LontrolÃAdde‏ 
LontrolRermt‏ 
Lursorkhantc‏ 


Occurs when the component Is 
clicked. 


و تحتوى نافذة وام مع فى نافذة ءعأا۲مم هام على جميع الأحداث التى يمكن للعنصر الاستجابة له 
للقيام برد برمجى معين. 
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LL a a LE E | 
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Properties 
Buttonl System. Windows,.Forms,Button 


Click 
MouseCaptureChangı 
MouselLlick 
Appearance 

Paınt 

Behavior 
LhangelUlC ues 
LontrolAdded 
LontrolRermowed 
HelpRequested 


Click 
Occurs when the component is clicked, 


Properties 
Button] System, Windows,Forms,Button 


Forml.wb MouseCaptureChang 


MouseClick 
Public Class Forml : Appearance 


Paint 
Private Sub Button1 Click(ByvVal sender As System.Object, ByVal 
ا5‎ rivate Sl utton1 Click(ByVal sender As System Jec a Behavior 


MessageBox. Show{("Hellow world" } Ch Ir 
angelllCues 


End Sub ControlAd decd 


ControlRermoywecl 
Private Sub Button1 MouseClick(ByVal sender As System.Object, | HelpRequested 


QueryAccessibilityHel 
End Sub ا‎ EEF 


End Class MouseClicl 
Occurs when the control is clicked by the mouse, 
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Recent Templates : , | Defaul' ا‎ Search Installed Templates 
Installed Templates 
Type: Visual Basic 


Visual Basic = û project for creating an application with a 
et . Windows user interface 
Online Templates (a) | WPF Application 


Lonsole Application 
Llass Library Visual Basic 


WPF Browser Application Visual Basic 


LessonO3 


ECE ETB 


2 -صمم الواجهة التالية: 


Lessonl3 - Microsoft Visual Basic A210 Express 

File Edit View Project Build Debug Uata Format Jlools Window Help 

¬> © - و |2 - اةاشا ت اچ س قلق : 

HIE ã4 AT FT BIR AIH BE |e FE FE FR | 3 3} $ 

- Solution Explorer 
El Lesson03 


iza My Project 
3 Form wb 


33IN EFE ل‎ XOqIOO] 


Properties 


Viicrosoft Sans S5 = 
ForeLolor SS Lontroll ext , 
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عند الأحدث 
)icا€‏ للعنصر 


Button1 


ivate Sub Button1_Click(ByVal sender As System.0 
TextBox1.Text = "ails il LqiÎ اıجرم!‎ "| 

ستتغير خاصية الكتابة ا×ع] 
فى العنصر ۲e×†80×1آ‏ 
لتظهر "مرحبا أيها العالء!" 


Û] Lesson03 - Microsoft Visual Basic 2010 Express 


HE = RE a leg. 


Formil.wb [D E5 qnj*‏ ات 


إمرحبا أيها الحالم 
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rml.wb [Design]‏ ج 


a A a + 


Elc Class Forml 


کن |00| 


1 و 
ا 


Efrivate Sub Button1 Click{(ByVal sender As “ 
TextBox] 


3 


قائمة تذ E‏ ا 9 
کیرد n # MaskedTextEox SS‏ ا 

EE الكائنات المستخدمة فى‎ 
2 EF" RichTetBoxLanguageOptions 

المشروع الذى يتم العمل فيه 1 


EF RichTextEoxSelectionAttribuıte 


قائمة تذكيرية بالخصائص التى يتم التحكم 
فيها للعنصر المحدد و تظهر عند كتابة 
النقطة " ۾" و يمكنك الختيار أيا من هذه 
الخصائص عن طريق الاختيار بالماوس 


الكتابة و اختيار الكلمة بالمسافة 


3E Lesson03 


` Bal My Project 
Forml wb 


ت غ ا 
المرادة سيظهر مربع يشرح لك أكثر عن 


Public Overrides Property Text 
bets or sets the current text In t 
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3.اأدوات تساعدك فى كتابة الكود 
يوجد بعض الأدوات التى ستساعدك فى عملية كتابة الكود و مراجعته. 


1 كتابة تعليق أو ملاحظة على الكود: 
يمكنك من خلال كتابة ملاحظات (ليس لها دلالة برمجية) داخل الكدة حتى تمكنك من معرفة وظيفة 
الكود أو تخبرك عن أهمية جز ء معين من الكود. 


يمكنك كتابة ملاحظة عن طريق " “ " و ستظهر باللون الأخضر كالأتى: 


eme mx 


Public Class Forml س‎ 


Private Sub Button1_ Click{Byval sender As System.Object, Byvr] f 
TextBox1.Text = "pilzJl L#يÎ "إمرجحيا‎ 


او ملاحظة على جزة معين' 
من الكود و ليس له أى وظيقة" 
عقد تتقية البرتامع' 
End Sub‏ 
End Class‏ 


3 


أ 1 | 4 > 100% 


يمكنك أن تجعل جز ء من الكود فى ملاحظة أو تعليق حتى يمكنك تذكره فيما بعد » و لكن تذكر أنه لن 
يعمل فى تنفيذ البرنامج سيتحول إلى مجرد تعليق» و هذا سيساعدك إذا أردت كتابة كود لا تحتاجه فى 
الوقت الحالى و لكن لا تريد حذفه مجرد تذكره. 


تعلّم على الجزء المطلوب من الكود و ثم ابحث عن الزر التالى فى شريط الأدوات فى الأعلى: 


WindowsApplicationl - Microsoft Visual Basic A2010 Express 
File Edit View Project EBEuild Debugmlata Iools Window Help 


کے ع ع ۾ TEETTITTTOIET > - | * u‏ 


و سیظهر الکود کالاآتی: 


WindowsApplicationl - Microsoft Visual Basic A010 Express 

Elle Edit View Project Build Debug _Uata JIools Window Help 

TEE ETEK OAESSET 
تھ‎ 


Formi.ywb [Design]* 


u a 


sa3Ino§ EFE U 


۴ ا‎ 
mS ı_oدmment‎ ouıt the selected lines, (Ctrl+ kK, Ctrl+ 0] 


1Public Class Forml 


= Private Sub Button1 Click{(ByVal sender As System.Objec) j 
"TextBox1.Text = "pilzIl Li "!رحبا‎ 
او ملاحظة علي جزء معين"‎ 
من الكود و ليس له أى وظيقة'‎ 
عتد تتقيةت اليرتامج'‎ 
End Sub 
End Class 
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يمكنك ادخال موقع داخل التعليق حيث ينفع فى ارفاق الكود مع موقع: 


Forml.vb* Ix 
1Public Class Forml اا‎ 


| * 


Private Sub Button1 Click(ByVal sender As System.Object, ByVz 
TextBox1.Text = "pilzil LqıiÎ "!مرا‎ 1 
'"' هتا يمكتتي كتاية تعليق‎ 2 
او ملاحظة علي جڙ۶ معين"'‎ 


من الكوتد و ليص له أى وظبيقة' 


http:#//algoharism. blogspot . com 


End Sub 
End Class 


100 =» 4| 


فقط عليك كتابة (داخل التعليق): //:م1]" ثمم اسم الموقع. 
2 -اظهار أرقام السطو: 


يتيح لك إظهار أرقام السطور طريقة سهلة للوصول إلى سطر معين داخل الكود. 
يمكنك إظهار الأرقام كالتالى: 


Tools >> Options : 


Indentirnıg 


Environment 
Indent type: 


+ Projects and Solutions 
Text Editor Basic 
VE Spe 
Editor 
Tab size: 4 


Indent sıze: 


Interaction 


O] Word wrap 
O Line 20 


Wancel 


[Show all settings 


ستظهر الأرقام بجانب السطور كالتالى: 
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BAPublic Class Forml 


Private Sub Button1 Click(ByVal sender As System.Object, 
TextBoxl. Text = أمورحجبا اھا العالم"‎ 
' هتا يهكتتى كتاية تعليق‎ 


او ملاحظة على جزة معين 
من الكود و ليس له أى وظيقة' 
عتد تتقيةت البرتامج' 
http:#falgoharism. blogspot . cC‏ ' 
End Sub‏ 


تم نم لیا ظط اا ا لد تت طا 


End Class 
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م 
4. دريب 
1- استکشف الأحداث واہمںء للعنصر ۸٥ااںط‏ عن طریق ادخال ٤٥۸1‏ ں8 داخل المشروع › و 
اكتب حسب الحدث الذدى تم اختياره داخل كود البرمجة: 
MessageBox.show("Name of Event”)‏ 

Click ® 

Enter ® 


Leave ® 


MouseHover “® 


لو لم تفهم وظيفة ال ٥م۴۷‏ يمكنك اختيار ال ٤ع‏ ثم اضغط 1 فى لوحة المفاتيح لتعرف أكثر عن الوظيفة. 


2- جرب ان تستخدم ٥×‏ طا×ه و تجرب الکود: 
MessageBox.show("Name of Event”)‏ 
مع ال وخم مvعالتالية:‏ 


keyPress ® 
KeyDoOWwn 
KeyUÛp 
TextChanged 
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1.مقدمة عن الوم[طھذاج۷ المتغيرات 


سنبدأً بتعريف المتغير ماطه اه۷ و هو يشير إلى موقع تخزينى فى الذاكرة و يمكن أن يحتوى على 
بيانات (عددية أو حرفية) › و يتم تعريف المتغير أثناء كتابة البرنامج » و يمكن تغيير محتوى هذا 
المتغير آثناء سير البرنامج » و كل متغير له اسم وحيد يعرف به و لا يمكن وجود متغيرين أثناء سير 
البرنامج » و كل متغير له اسم وحيد يعرف به و لا يمكن وجود متغيرين او أكثر بنفس الاسم فى 
عند تحدبد اسم المتغير يجب اتباع شروط محددة: 


1. أن یبدا بحرف هجائی (انجلیزی) : ۷,2,....,ط,ھ A,B, .....۷۲,2 O۲‏ 

2. ألا يحتوى على علامات خاصة (؟»! ٠:‏ ....) 

3. ألا يكون هذا السم من الكلمات المحفوظة فى اللغة البرمجية مثل عارع , إ۴ 
4. السك قد يتضمن أرقام و حروف. 


سنتحدث عن أنواع المتغيرات : 


أنواع اlبيlنlت Data types‏ البيانات الطول 
بالبایتٽت 
عدد صحیح Integer‏ يتضمن أعداد صحيحة byte‏ 2 
عدد صحیح طویل ع۸٥۔‏ يتضمن أعداد صحيحة byte‏ 4 
نعم| لا Boolean‏ يتضمن القيمة 1 عا أو 0 عءاھf byte‏ 1 
مفرد Single‏ يتضمن أعداد بها كسور byte‏ 4 
مزدوج double‏ یتضمن آعداد بها کسور byte‏ 8 
عملة Currency‏ یتضمن آعداد بھا کسور و رمز العملة عالط 8 
سلسلة حرفية String‏ يتضمن بيانات حرفية byte‏ 1 
تاریخ Date‏ يتضمن بيانات تاريخ byte‏ 8 
کائن Object‏ يتضمن كائن مثل صورة أو فيلم ....إلخ 
عام variant‏ يتضمن بيانات من نوع أرقام أو حروف 


نأتى لجزء مهم فى تكويد المتغيرات و هو تعريف المتغير و هو الإعلان عن اسم المتغير و نوعه 
داخل نافذة البرمجة › و من صور المتغير داخل نافذة البرمجة: 


Dim VariableName As DataType 
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أمثلة تعريف على أنواع المتغير ات السابفة: 


أنواع lاlئبيlنlت‏ esضty Data‏ التعر يفا 
علد صحيح Dim myIntegr As Integer = 3 Integer‏ 
نعم| لا Boolean‏ 


double مزدوج‎ 
Dim mySstring As String String سناس له حرفية‎ 


- لاحظ فى الأمثلة السابقة عند كتابة اسم المتغير ءاطهأ ه۷ اتباعه للشروط المتبعة. 
- بالنسبة للتعریف المتغیر ع۲)؟ نكتب الکلمات بین علامتى تنصيص " ". 
- لا تخلتف الكلمات المكتوبة بحروف اهام جععن المكتوبة بحروف |اجةمءأى 
mylIntegr=myintegr‏ 


Dim myBoolean As Boolean = true 


Dim myDouble As Double = 3.14 


ه مثال: على كيفية كتابة متغير و تعريفه فى نافذة البرمجة 
-انشأً مشرو ع جدید باسم ۸04 ۴550| 


WindowsApplicationl - Microsoft Visual Basic 2010 Express 

File Edit View Project Build Debug Data Format JIools Window Help 
: أ اهف # اق قا 7ك عالت‎ 
د‎ || TET 


2 r 3 ت‎ - a r ت‎ TIE nin Hp ت‎ e D4 
: | کت ]ا‎ Zz ار و اا | بجح اا2 بحب | للل ٣ك الل‎ m4 + 


Formi.wb™* 


E EREE 

GEl WindowsApplication1 
=A] My Project 
Es] Formû.wh 


3 
- 
لق‎ 
rt 
نآ‎ 
2 
=| 
= 
r 
La 
FM 
ا‎ 
ر‎ 
1 

= 
e) 
a 
E 
=| 
ا‎ 


Properties 


Form System. Windows,Forms,.Forl = 
: HEB 
SizeripStyles Auto 2 
StartPosition WindowsDefaultl 
Tag 
Text Form 
TopMoast False 


Button 1 JlEeDouble Click طخضl-‎ 
E 
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Formi.wb* 


7 ick 
1 HPublic Class Forml 


ا 
U]‏ 


Private Sub Button1 Click(ByvVal sender As System. 0l 


' Example 1a 
Dim myö5tring As String = "Bob" 


نیا ظ ها © لد بت ص 


' Example 1b 

Dim myInteger As Integer 
Dim myDouble As Double = 
Dim myBoolean As Boolean 


فم نل 
ت د 


فم فم 
ددا سا 


End Sub 
End Class 


تٍ 
1ے 


Example 1c 
Dim hello As String 
hello = "hello world" 


سيظهر هتا ما يتضهن المتغير' 
"hello‏ 
و هو ما يوجد يين علامتى التتصيص' 
"hello world‏ 

MessageBox. Show(hello) 


ستظهر هتا الرسالة' 
ققط ص0ااعم' 
MessageBox. Show( "hello"‏ 


End Sub 
End Class 
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سنستخدم المثال السابق و الذى تصميمه : 


WindowsApplicationl - Microsoft Visual Basic 2010 Express 


: TIE ةذ‎ AT TF LL | o HE FF |e FE FF £ | 2 Î $ 2: | E E | هھ‎ | + 
| : F۴ 0 rm ا‎ 5 
کا الع لے | کا‎ 


ll My Project 
Ea] Formi.wvb 


5 e0 


HOAOT] x SAIN 
his 


Properties 


* | 
Þ Size 100; 20 
Tabötop True 
و‎ 
Text 
TetAlign Left 


"hello 

و هو هما يوجد يينَ علامتى التتصيص' 
"hello world‏ 

MessageBox. Show{(hello)} 


ستظهر سقا الرسالة' 
ققط م0ا1عhe'‏ 
MessageBox. Show ( "hello" }‏ 


" Example 2 
Dim firstTextBox As String = TextBoxl. Text 
Dim secondTextBox As String = TextBox2. Text 


Label1.Text = firstTextBox & " " & secondTextBox 
End Sub 
End Class 
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سنكتب الكود من السطر28 حتى السطر 32: 


Example 2 
Dim firstTextBox As String = TextBox1. Text 
Dim secondTextBox As String = TextBox2.Text 


Label1.Text = firstTextBox & " " & secondTextBox 
Stاrا|‎ ٣ع متغیر نصىی‎ ۴ا٣٣‎ ٥×80× فی هذه السطور سنجد أنه تم تعریف المتغیر الأول و اسمه‎ 
۲٥×80×1 المكتوب فى العنصر‎ ٠٠× ومحتواه هو النص‎ 


و أیضا تم تعریف المتغیر الثانی و اسمه ×0 ٥×۲8‏ 0۸۲٥ء‏ کمتغیر نصی ع٣٣6‏ و محتواہ ھو 
النص المكتوب ×ع٠المكتوب‏ فى العنصر 80×2ا×٥٠‏ 


و تم تكويد العنصر 11ء (ه] ليظهر النص داخله :٠٥×٤‏ 
ما یحتویه المتغیر × ٥×۲8‏ ۲51۲ا (و هو النص المکتوب فی ٥×1‏ ط†×xم۲)‏ 


+ ( و هو ما تمثله علامة &) ما هو مكتوب بين علامتى التنصيص ( المسافة) 


+ ما يحتويه nllتغıر secondTExBoxX‏ 


لفهم الهدف من التکوید السابق اضغط علٰی عٍںطع٥‏ فى صندوق الأدوات فى الأعلى * أو اضغط 
5 ليظهر البرنامج كالتالى: 


- إذا كنت تعمل على نفس المشروع السابق فى نفس الدرس قبل البدء فى تنفيذ البرنامج يجب 
إيقاف العمل فى الكود فى السطرين :22 و 26 عن طريق التعليم على الكود و اضغط على 


Eile Edit View Project Build Deby a [Iools Window Help 


Dim rere As5 Double = 3.14 

Dim myBoolean As Boolean = True 4 A) My Project 
ES Formil.wb 

" Example 1c 

Dim hello As String 

hello = "hello world" 


سيظهر هتا هما يتضهين الستقيو' 
"hello‏ 

| هو ها وجك ين علامتقی ا[ تتصيص" 
"hello world‏ 

"MessageBox. Shou (hello) 


ستظهر هتا الرسالة" 
ققط 'hello‏ 
"MessageBox. Show ("he11o"|)‏ 


" Example 2 
Dim firstTextBox As String = Text 
Dim secondTextBaox As String = Te ” 
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اکتب "المتغير 1 المربع 
اا ر ا ال 
2 کے المربع ال2 تم 
اضغط علی 0۸1ا Bu‏ 
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۾ ” چ ۴ أ م * 
3 كيفيه التحويل بين انواع المتغيرات 
یحتوی بيانات) و أيضا هذه المتغيرات تختلف فى أنواعها و بالتالى تختلف حسب كل نوع فى 
المساحة التى تشغلها. 


يوجد طريقتان للتحويل بين أنواع المتغيرات › سنتناولهما ثم سنعرض مثال على كل طريقة: 


1 -icityامpص|‏ تحویل مطلق: 
ه و هى تتضمن تعريف المتغير آثناء شحنه بالقيمة أو البيانات أى تعريفه و شحنه 
EET E AN OE‏ 
ه يعيب هذه الطريقة عدم إمكانية التأكد من صحة أنواع البيانات المدخلة مسبقا. 
2 -۷اiiام»×E‏ تحویل محدد واضح: 
٥ه‏ و تتضمن تعریف المتغیر و تحديد نوعه قبل شحنه بالبيانات. 
© تتميز هذه الطريقة أنه يتم اكتشاف المتغيرات بسهولة و التأكد أن جميع العمليات 


الآن سنعرض مثال لكل طريقة: 


ه مثال: على التحويل بين أنواع البيانات باستخدام طريقَةً غأİام"!:‏ 


ل اک الا کے ار ا ااا eT‏ 
2 -اكتب الكود التالى: 
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Formil.vb™ mE. 
ا‎ Button 
34 ' Implicit conversion - dangerous 
35 Dim myValue As Integer 
36 Dim myOtherValue As Double = 3.14 
7 myValue = myOtherVa lue 
38 
39 MessageBox . Show (myVa lue | 
4 End Sub 


41 End Class 

- إذا لاحظنا السطر 35 تم تعریف المتغیر عں ا۷ر" ک ۲ع‌ععtہ|‏ (یشغل 2 بایت فى الذاكرة) 

- السطر 36 : تم تعریف المتغیر e۲۷2 ue‏ 1ا0ہ ک مءاطubهط‏ (یشغل 8 بایت فی الذاکرة) و 
يحتوىی على البيان 3.14 

- السطر 37 :تم تحويل المتغير عمuاة۲۷٠†0رم‏ إلى عمuاة۷رم"‏ (تصغير المساحة التى يشغلها 
من 8 إلى 2 بايت) 

- السطر 39: سنجد اننا قمنا بعملیة تحویل أخری للمتغیر عمںا۷۷a"‏ من ٣ععع٤ہ|‏ (2 بایت) إلى 
String‏ 1 بایت) حیث الحدثٹ W٥ط؟‏ فی ×0 e8٥عMessa‏ لا یعرض إلى متغیر ڇہ|Str‏ 

- لتلخيص هذه العملية من التحويل بين آنواع المتغيرات 


MessageBox.Show 39رطudا‎ 37 السطر‎ 


myValue 2 (message) myOtherValue > myValue 
Integer (2Bytes) 2 String (1Byte), Double (8 Bytes)2 Integer(2 bytes) 


3 ۔ عند تشغیل البرنامج عںطع5 


al Form1 صا‎ | * |اÇF‎ 


Label 1 


- على الرغم من أن المتغير الأساسى كان 3.14 إلا أنه تحول إلى 
"3" فقط » فقد حدث فقد فى البيانات عند التحويل من عاطںہ5 


(یحتوی آعداد فیھا کسور) إلى |٣٥٥٣‏ (یعرض آعدادا دون 
الكسور) و لذلك تعتبر عملية التحويل بين المتغيرات بطريقة 
ieiاpص|‏ خطیرة لأنها قد تؤدی إلى فقد بيانات. 
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"MessageBox . Show (myVa lue } 


Dim firstTextBox As Integer 
Dim secondTextBox As Integer 
Dim result As Integer = @ 


ظط 


TirstTextBox = TextBoxl. Text 
secondTextBox = TextBox2., Text 


ن 


نخ 


result =| firstTextBox + secondTextBox 
Label1.Text = result 


ن 
0ا © لد ت ص 


ل 


End Sub 
End Class 
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IY PIU‏ اتا 
Î Formi.vb‏ 
"MessageBox. Show (myValue)})‏ 


Dim firstlextBox As Integer 
Dim secondTextBox As Integer = @ 
Dim result As Integer = @ 


f : xtBox1. Text 
o u mel Tat His — Tener Tarr 


Conversion from string "five" to type ‘Integer’ is not valid. 

Troubleshooting tips: 

When casting from a number, the value must be a number less than infinity. 
Make sure the source type is convertible to the destination type. 

et qeneral help for this exception. 

InnerException: Make sure your method arguments are in the right format. 


InnerException: When converting a string to DateTime, parse the string to take the date before putting each variable into the DateTime object. 


FF 


Search for more Help Online... 


Actions: 
View Detail... 


ال س اا اا س اا ب ا ال ا ال س ف ت د 
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4.يعص التعريفات شی | لمتعبر ات 
سنعرض بعض التعريفات التى سنحتاجها فى عملية بناء و تحديد المتغيرات › و أهمها تعريفين: 
statement‏ و ex×pression‏ » سنعرضهما من خلال المتال التالی: 


ذا كتبنا الكود التالى و قمنا بتشغيله: 


Dim x As Integer 
XxX + 3 


عند تشغيله سيحدث خطأ » و ذلك لأن السطر الثانی من الكود السابق هو ٥۸‏ اوومم×ع۴ و لیس 


Statement 
سيوضح الجدول التالى أكثر الفرق بينهما:‎ 


Expression‏ تعبیر 
هی عبارة جبریه او مقدار جبری 
يمكن تقييمها بالارقام لأنها تتعلق بالعمليات 


الحسابية 
تتضمن عمليات طرح و قسمة و سائر العمليات 
NNT‏ 


أو حتى كالمثال التالى: 
3 صح أم خطا؟ ..... خطاً 


الدرس الرابع- المتغيرات و أنواعها و استخداماتها 


- فی تعريف أخر للہExpressio:‏ 
هى هبارة عن ربط مجموعة من العناصر (سواء كانت هذه العناصر توابت أو متغيرات أو معاملات 
) و يشترط فى ذلك أن تكون مكونات التعبير "اوم٣‏ م×عم الواحد متجانسة مع بعضها فى نوع 
البيان المرتبط فى هذا التعبير (عممر aخةك)‏ . 


Statement‏ جملة 
هو افادة أو تصریيح 
مجرد إفادة أة تصريح بعملية برمجة 


تتضمن تعر يف المتغیر Dim x as Integer‏ 
او شحن المتغير بالبيانات3= ger‏ ع My|†‏ 

أو إظهار رسالة 

نصية MessageBox.Show”Hello world”‏ 
أو حتى إعلان عنصر جديد 
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5.ندریب 
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قم ببناء البرنامج الخاص بخدمة العملاء المشروح فى الدرس الثانى » مع إضافة زر 0۸و الذى ٠‏ 
سيقوم بتسجيل جميع البيانات المدخلة إلى متغيرات قم بتحديدها مع مراعاة تعريف الأنواع الصحيحة 


1 تخ ات ا » م 


EBI" 


Ca 


. 


Combo BOX 


یحتوی على (أحمد - محمد - ممدوح) 


List box 


يحتوى على (خضر- فاكهة- بقالة- ألبان) 


|۴٩| ا ~—————ııukukx—x—x—x—x—x—xاارسل نالوخ‎ Check Box 


ails‏ ت 


Button 


al Formî 

اسم الزبدت ۰ 

المنئج ا 
ع 


زر )مو الآخر اعمcanc‏ 


الدرس الرابع- المتغيرات و أنواعها و استخداماتها 


Microsoft 
VB Express 
2010 للمبتدئين‎ 


ان ا ا 
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شرح لبعض أنواع الجمل وا٥"‏ عهاء وكيفية 


استخدامها و أنواعها 
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1 . مقدمه 
فی هذا الدرس سنتعمق أكثر فى عملية بناء الكود > فسنوضح أمذلة على الو†ممem Stat‏ فقد قلنا 
فى الدرس السابق أن الئ†Statemen‏ الجمل ما ھی إلا إفادات أو تصر يحات. 


- راجع الجزء الخاص بال Expressions ر5t ate" "ts‏ فى الدرس الرابع 


س 
(E:‏ 
و 


8 
e 
« 
« 


ندکر من هذه الأمثلة ٠‏ 


3 


Statements .1‏ Branchingالجمل‏ التشعبیة. 
Recursion Statements .2‏ الجمل الحلقية التكرارية. 
Arrays 3‏ متغیرات منعددة المحتوى. 


Recursion Statements Branching Statements 
الجمل التشعبية الجمل الحلقية التكرارية‎ 


يسمح هذا النوع من الجمل بتغيير أو تفريع تنفيذ أما هذا النوع فيسمح لنا التكرار فى تنفيذ الكد 
الكود حسب تقييم المقدار الجبرى ووم م»×م داخل مجموعة من البيانات و الهدف منه كمثال 
Ty‏ 


أمثلة من الإفادات: أمثلة: 
For Each .1 If....Then .1‏ 
For ...Next .2 Select Case .2‏ 


لمعرفة المزيد عن هذه الجمل تابع الشرح التالى. قم بإنشاء التصميم التالى و سميه 0۸5ءءع|: 


Forml.wb [Design] >3 x 


ComboBox 


یحتوی علی(محمد - ممدوح - أحمد) 


ListBOX 


یحتوی علی(کمبیوتر مکتبی - محمول - نقال - إضافات) 


الدرس الخامس - الجمل state ments‏ 
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2..,.الجمل التشعبیۂ: ٥ط 1۴...٣‏ 


هى جملة تشعبية وظيفتها تقرير ما إذا سيتم تنفيذ أو عدم تتفيذ مجموعة من الأوامر حسب تقييم مقدار ‏ 
جبر ی 6×٥ ۲]€S5S|0۸‏ 


اکتب الکود التالی فی ۸1 0ااںB‏ 


1 ElPublic Class Forml 
2 
3 8 Private Sub Button1 Click{(ByVal sender As System.Object, By f 
4 
5 " Example 1 - First 'if/then"' statement syntax 
If ComboBox1. Text = "1a» »" Then 
MessageBox. Show("دsaan إ"لقد اتحترت‎ 
ComboBaoxl. Text = ""™ 
End If 


End Sub 
End Class 


ب 0 
و معنی الکود |۴...۲٣ ٥٠٣‏ أنه فى حالة اختيار "محمد" من العنصر 080×1طا ٥٥۳١‏ ستظهر رسالة 
"لقد اخترت محمد" »لکن فى حالة عدم اختیار "محمد" لن یتم نفیذ الکود بعد ٣٥٣۲ء‏ و وظیفة ۴| dمع‏ 
لتقرير نهاية الجملة خ٣‏ عع اء ليعلم ال۷6 آنھا نهاية جملة .|۴..٣ ٣٥٣‏ 


e e MISIR ILS OL 


الدرس الخامس - الجمل e statements‏ 
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اختیار محمد: 
أى فى حالة اختيار محمد تقييم التعبیر ب "نعم" سيتم تحقيق الكود 
و فى حالة عدم اختيار محمد € تقييم التعبير ب "لا" > لن يتم تحقيق الكود 
|٤. TEN a e ae e al Ji‏ وهی أن تكون فى سياق الكود: 


Formiwb* o FOX 


: Example 1 - First 1f/then statement syntax e 
b "If ComboBoxl. Text = "جو"‎ Then wy 
MessageBox. Show("saz— ترaتZۍzëا ("لقد‎ 

'"  ComboBox1. Text = "™ 

3 "End If 


۰ statements, 
''else' statement 
If ComboBoxl. Text 4% "ıax o" Then 
If ComboBox1. Text = "gua" Then 
MessageBox. Show(" gan "لتقد اخحترت‎ ( 
Else 
MessageBox. Show("dرluiaZخËëا "لست متأخدا من‎ ( 
End If 
Else 
MessageBox. Show" aaa "لتقد اعحترت‎ 
End If 


End Sub 


خطوات تنفيذ هذا الكود ستكون كالآتى: 


الدرس الخامس - الجمل state ments‏ 


- سنلاحظ أنه تم تنفيذ الكود أو عدم تنفیذہ حسب تقییم التعبیر 0۸ أئئمم×ع (نعم أو لا) للجملة 
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ComboBox1.text 


النص المدخل فى 80×1 0ط ٤٥٥٣‏ 


لو لم یکن الاختيار ۳" L8‏ 
”محمد“ >< If Combox1.text‏ 


ملحو ظة: <> معناھا لا پساوی + 


TTT TET 


else 


أظهر رسالة "لقد اخترت محمد" 


”قد ا|خترٽت مد ”= Messagebox.show‏ 


أظهر رسالة "لم أتأكد من الاحتيار" 


Messagebox.show =” ja دكİتÎ لم‎ 
”الاحتيار‎ 


الدرس الخامس - الجمل state ments‏ 
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لو تم تحقيق هذا الشرط 


then 


لو کان الاختيار "ممدو" 


If ComboBox1.text=”ج ”مدو‎ 


لو تم e‏ قد . هد | الشرط 


then 


أظهر رسالة "لقد اخترت ممدوح" 


”لقد ا|خترٽت مدو ح”= Messagebox.shOW‏ 
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"محمد" ستظهر رسالة " لقد اخترت محمد" » أى اختيار آخر ستظهر رسالة " لست متأكدا من 
اختيارك". 


الرس الخامس - الجملز statements‏ 
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Se] ect as 2.,.الجمل التشعبية:‎ 


تماثل الجملة التشعبیة ٣٤ط |۴.١٣‏ . 


اكتب الكود التالى : 


Formil.wb™ += x 
21 "End IF 2 
1 : 
2ے‎ '" Example 3 - case/select branching statement 
24 Select LCase ListBox1.SelectedI[tem. ToString( j 
ا‎ Case "Jgazxna" 
26 MessageBox. Show (" Jaz اعحترت‎ دقل٣"إ‎ 
ا‎ Case "JlLa™ 
کے‎ MessageBox. Show" Jlaãۃ‎ ترتZz ("لقد ا‎ 
24 LCase Else ل‎ 
3 MessageBox. Show(["jzÎ اû&.ش ["لقد احترت‎ 
31 End Select 
32 
E End Sub 
34 | End Class 
35 | ِ 
100 %_ > 4 a : 


- خصائص ×٥(1ءاا‏ فی الکود ()چ,ا†Sہ 8B 0x1.SeاectedIlt em.‏ t1ءiا‏ سنتطرق له 


هکذا عند اختیار "نقال" › آما عند اختیار آخر ستظهر "لقد اخترت شيئا آخر". 


A NG Sd 
الأخرى » ستعرف أكثر ما هو الأنسب مع برنامجك مع التدرب أكثر و التوغل فى عملية التكويد‎ 
كثر‎ 


الرس الخامس - الجملز statements‏ 
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+ * ق + 0 + 
3.متغيرات متعددة المحتوىءرج٣Ar‏ 
هى طريقة لجمع مجموعة من المتغيرات مترابطة معا بطريقة ما » أو هو متغير واحد يحتوى على 
عدة بيانات مترابطة ( وعاء له أكثر من جزء لحمل الأشياء) لكل بيان داخله له رقم للوصول إليه » و 
یمکن اس ستخدام ۷ متلا لأحفظ در جات امتحان لفصل محدد أو قائمة بأسعار و ھکدا۔ 
لتعلم كنابة array‏ انظر إلى الكود التالى: 


Fomiwb* o TOX 


33 '" Example 4 - Sized Array 

34 Dim ATE) 5 SEF 

35 myArray( êj = "saz n" 

36 myArray(1) = "جgدnم—n"‎ 

3F nyArray( 2j = "الجوهريى"‎ 

38 MessageBox. Show(nyArray( 2) j 

3 

اا 

41 End Sub 1 
42 | End Class 1 
42 ا‎ 


IDO r” 4 IN ۴ 


هی لإعلان المتغیر :51۳ 
عدد البيانات التى سيحويها المتغير المتعدد المحتوى :(2) اسم اlٹnمتغير myArray(2): myArray:‏ 
تعریف المتغیر کمتغیر خطی (یحتوی على نصوص) As S۲٣:‏ 


هی المتغیر الفرعی رقم 1(المحتوی رقم 1) y)0(:‏ ۷۸۲۲۵" 
المتغیر الفر عى "۷۸۴۲۴١۵۷)1(:2‏ | 35و36و37 
المتغیر الفر عى ۷۸۴۲۲۵۷)2(:3ر" 
إفادة بإظهار رسالة بمحتويات المتغير الفر عى 3 MEssageBox.Show(m¥yArr2¥)2((‏ ¦ السطر 38 


لفهم أكثر للمتغير متعدد المحتوى:انظر الشكل التالى 


الرس الخامس - الجملز statements‏ 
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الدرس الخامس - الجمل statements‏ 


عدد المتغيرات (المحتوى) 
الفرعى 


3 متغیرات 2 (2) 


E 1(0 myArray(1) 


متغیر فر عی۲ 


a 


myArray(2) 
۲ متغیر فرعی‎ 
"الجو هرى"‎ 
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أسمه 


myArray 
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33 " Example 4 - Sized Array فد‎ 
34 Dim myûrray( 2) As String 

35 myArray(@j = " ۰ 

36 nyArray(1) = "جgدna—n"‎ 

37 nyAûrray( 2) = "الجوهرى"‎ 

38 nyArray(3) = "sıaz>Î" 

39 MessageBox. Show (nyAûrray (2) j 

ا4 

41 

42 End Sub 


43 End Class 


ثم قمنا بتشغيل البرنامج »ستظهر رسالة خطأ تفيد بأن يوجد متغير فرعى خارج نطاق المتغير 


الاتتاين ‏ " ڪا ف ا اڪ ا 
J E WindowsApp‏ “ 
[aA] My Projec‏ 
E =) Forml.wb‏ 
Example 4 - Sized Array ۴‏ " 
Dim myÃûrray( 2ã) As String‏ 
myAûrray( êj) = "sı az n"‏ 
"مnnدوzg"‏ = )1( nyArray‏ 
A 4 Ba 9‏ 
MessageBox . Show (myAr a 21‏ 
2l IndexOutOfRangeException was unhandled 3‏ 
End <ub Index was outside the bounds of the array.‏ 
End Class Troubleshooting tips:‏ 


i Make sure that the maximum Index on a list Is less than the list size, i 
Make sure the index Is not a negative number, 


Make sure data column names are correct, 


wet general help for this exception, 


search for more Help Online... 
Actions: 
View Detail... 


Lopy exception detail to the clipboard 
15 statements الدرس الخامس - الجمل‎ 


"Tonrad", "Grant"} 
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طريقة أخرى لكتابة كود المتغير المتعدد المحتوى بدون تحديد عدد معين للمغيرات الفرعية منه: 


Forml.wb™ 2 
41 " Example 5 - Initialized Array چ‎ 
42 Dîn myOtherArray ( ) 5 string ت‎ "٣ و "ل جهدك‎ N و فهك 4ح‎ LL أ لجو هری‎ " mI ر‎ LL ۴ 
43 MessageBox . Show (myOtherArray (2) ) 
44 
ا‎ =] 
45 | End Sub ّ 

100 % ~i اها‎ 


حيث يمكنك اى عدد من المتغيرات الفرعية أو تغيير عددها خلال عملية التكويد » لاحظ أنه تمت 
كتابة المتغيرات الفرعية داخل [ ) » و عند تشغيل عںطءه الكود ستظهر رسالة نصية بمتوى المتغير 
الفرعى 3. 


الرس الخامس - الجملز statements‏ 
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4.. الجملة الحلقية التكرارية: طcجءع/١0؟‏ 


أو يمر على كل متغير فر عى فى متغير متعدد المحتوى» لنر ذلك فى المثال التالى: 


Forml.wb* wr x 


4 " Example 6 - for each ga array 

4 Dim myArray(} As String = {"دaanم", }"أجحفد" و,"الجوهرى" ,"دوج"‎ 

4 

4 Dim person As String 

For Each person In myArray‏ ا 

51 MessageBox . Show( person j 

Next‏ ل 

3 

End Sub‏ ن 

355 | End Class 

3 
100% + 4| ıı | ۲ 


فی هذا الکود تم تعریف ۷ھ۷۸۲۲۵" کمتغیر نصی متعدد المحتوی › و المتغیر ۳۹0۸عم تم تعريفه 
آیضا کمتغیر نصی و تم استخدامه فی السطر 50 لیحتوى متغير فرعى واحد فى كل مرة من خلال 
الكرد همع ۴٠۲‏ لتظهر رسالة نصية فی کل خطوة بمحتوی المتغیر 0۸٣٥ص٠‏ لفھم أكثر قم بتشغيل 
البرنامج: 


أی أنه ینتقل کل خطوة (بشکل تکراری) فی الكود المحدد له(هنا المتغير متعدد المحتوى) حتى نهاية 
التكرار. 
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(a Microsoft Visual Basic 2010 Expressll J مقدمة‎ 


f0 ٣١/۸ ع×t الجملة التكرارية:‎ ..4 


تستخدم لتكرار جزء من الكود عدد محدد من المرات يتم تحديدها مسبقا » سيتم شرحها من خلال 


الكود التالى: 


=x 
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Formi wb” 


__ Button <| Cik 
33 


E3 
2 
4 ' Example 7 - 'for/next" recursion statement 
3 
56 Dim i As Integer = @ 
57 For ûi = @ To 5 
38 MessageBox. Show( 1. ToString( } j 
3 Next 
ا‎ 0 
1 End Sub 5 
b2 End Class ٍِ 
3 
100% > + 1 ا‎ ۲ 


سطر 56:تم تعريف المتغیر ¡ ك ٣ععع‏ م و شحنه بالقيمة 0 . 


سطر 57 و 58: تكويد المتغير ¡ بأنه يبدأ من 0 حتى يصل إلى رقم 5 » فيما معناه أنه سيتم إعادة 
الكود 5 مرات و فى كل مرة سيظهر رقم من 0 إلى 5 بالترتيب فى رسالة 


سطر 59‘ نهاية الإفادة. 


لفهم أكثر انظر الشكل التالى للكرد ×ع۲/۸٥۴0:‏ 


Var2 
متغیر عددی يمثل‎ 
القيمة النهائية‎ 
counter للمتغیر‎ 


Var3 
متغير عددى يمثل القيمة المراد‎ 


إضافتھا للمتغیر ١٥ا۸‏ ںuہع‏ فی 
کل مرة تکرار 
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Vari1 
متغیر عددی يیمثل‎ 
الق الات‎ 
counter للمتغیر‎ 


ar1 To Var2 Step Var3 


For Counter = 


Statements 


Counter 


منعير عددی يسحدم 


كعداد للاإفادة التكرارية و 
عادة ما یکون e۲€gع†¬i‏ 


مجمو عة الإفادات أو 


الأكواد المراد تكرارهاو 


هی تمثل محتوی الإفادة 
الكرارة 
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الدرس الخامس - الجمل state ments‏ 79 
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5. تركيبات بين الجمل التكرارية و التشعبية 


بعض التركيبات بين الجمل لتوضيح بعض المجالات التى يمكن استخدامها مجتمعةء و سنبداً بالجمع 
‘if ...then yfor/next jı‏ 
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Formil.wb™ += x ١ 


9 

74 " Example 9 - combining array and branching statements 

71 Dim myArray( j As String = {"دaaم", #"أحجمد" و,"الجوهرى" ر "مدوم"‎ 

2 

73 Dim i As Integer 

74 For i = @ To myAûrray.Length - 1 

75 If myArray( i) = "syagzxJIl" Then 

إ “اتم ایجاد اتkجوShow("“jag MessageBox.‏ 76 

f Exit For 

3 End If 

79 Next E 

38 18 

81 End Sub 

dA ıd Class ¥ 
100 e ا‎ BD 


السطر 71: تم تعريف متغير متعدد المحتوى ۷ج۲٣۲‏ ۷۸م و شحنه بالبيانات المذكورة فى الكود. 
السطر 73: تم تعریف المتغیر ¡i‏ ک ٣عgعع)nہi‏ 


السطر ٠:74‏ أصبح المتغير ¡ هو العداد للافادة ۴٠۲/٣ ٥×٤‏ و قيمته الابتدائية 0 و قيمته النهائية هى 
عدد القیم فی المتغیر متعدد المحتوی (۲۸ع۸ ٣۵۷.٥‏ ۷Aص)‏ - 1 ۰ حیث سینتقل فی کل تکرار إلى 
قيمة من قيم المتغير متعدد المحتوى بالترتيب. 


- راجع الوره٣A۲‏ لمعرفة الفرق بين عدد القیم الفعلی داخل المتغیر "۸۲٣۷‏ و عدد القیم 
التى نحددها بين آقو اس المتغير myArray()‏ لمعرفة سبب الكود (ناقص 1( 


اط 5 هی محتوی افادة ۴٥۲/۸٥۸‏ و یتکون من الإفادة ٥٣‏ طع...۴| لترشد الكود أنه اذا 
وصلت الإفادة التكرارية فى المتغير متعدد المحتوى (myArray(i))‏ الى القيمة "الجو هر ى" ستظهر 
رسالة نصية "تم اختييار الجوهرى". 


السطر 77: ۴٥۲‏ †أ×ع لتفيد الخروج من الإفادة التكرارية و عدم اكمالها و ذلك من خلال الإفادة 
.if..next‏ 
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1 0 کک‎ 0 
A | 8 1 ! | 


السطر78 و 79: هى نهايات الجمل أو ٣ت؟.‏ 


بتشغيل البرنامج فى هذه اللحظة وuطعd )d0"†‏ . 


2m 
اقرا الجدول من هذا الاتجاه‎ 
ا‎ fتعةطمجلا____‎ زfةطجلا‎ 
ستتكرر حسب محتوى المتغير ¡ والذى‎ ys 
لجو هری =۳۷۸۲۲۵۷ | سیبدأ من 0 حتی عدد قیم المتغیر‎ 

1 ناقص‎ mصyAr‎ r۷ 


7 


= من 0 حتی (1-4) = من 0 حتی 3 
من الجملتين السابقتين سيستنتج الكمبيوتر أن المطلوب منه الاتى: myArray(i)‏ 
لو وصلت للاختیار "الجوهري" فی المتغیر ۷۸۲۲۵۷" حسب العداد ¡ الخاص 


بالإفادة f0۲‏ : 
مما یتنافی مع ۴|¡ ولن يتم تنفيذ و سينتقل سيقع الاختيار على القيمة رقم 1 و هى 


خطوة 0 
إلى الخطوة التالية سا 


مما یتنافی مع ۴|¡ ولن يتم تنفيذ و سينتقل سيقع الاختيار على القيمة رقم 2 و هى 
إلى الخطوة التالية "مدو" ا 
خطو ة2 


يتناسب مع شرط ¡f‏ وسيتم تنفيذ الكود _سيقع الاختيار على القيمة رقم 3 و هى 
التالى: الكو هري" myArray(2)‏ 
إظهار رسالة نصية 


إكمالها 


لكن عند تشغيل البرنامج عںرطع سنجد أن الكمبيوتر ينتقل إلى خطوة 2 على الفور لأنه لم يأخذ 
تعليمات أخرى (كود لينفذه) فى الخطوة 0 و 1 لينفذها لذلك لم يكن واضحا النتقال بين الخطوتين 0 و 
1 انما الخطوة 2 كانت الواضحة. 


- دائما ما يفكر الكمبيوتر(برنامج الأوجع8 اعںءا۷) بهذه الطريقة » مما يمكنك من من معرفة 
کا اا کر ےر کا ا 
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التركيبة الثانية ھی بین †غxعe"/إfoي select case‏ 


" Example 18 - recursion and branching combined ج‎ 
Dim i As Integer 
For i = @ To ListBox1.SelectedItems.Count - 1 
Select Case ListBox1. SelectedItems (1) .ToString( ) 
"کھییوتر مکتبے " ع5ھے‎ 
MessageBox. Show" agua") 
LCase "Jlقaتî"‎ 
MessageBox. Show(" Jla:"} 
Case "Jgaz n" 
MessageBox. Show" Jgaz n" j 
Case "تIقةlضl"‎ 
MessageBox. Show( "تlقةãlual!‎ " 
End Select 
Next . 


HÎ 


31 
2 
33 
34 
35 
3 
di 
38 
39 
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ب 


۶ ick : 
د‎ 


100 3% 


الهدف من الكود أنه عند ضغط 1١0ںط‏ سيتم تنفيذ إفادة تكرارية عدادها ¡ وقيمته الابتدائية 0 و 
النهائية هو عدد العناصر داخل 1×٥طءآ|‏ ناقص 1 » و فى كل تكرار سيتحدد الاختيارت التى قام بها 
المستخدم لتظهر له رسائل نصية بمحتوى الاختيار » لفهم أكثر قم بتشغيل البرنامج و قم بالتعليم على 
أكثر من اختيار فى 1×٥0طاء|‏ ( وذلك من خلال التعليم بالماوس مع الضغط على )٣٣|‏ و اضغط 


ton1اutط‏ عندما تفرع. 
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م 
6. دريب 
1 - ابدأ فى تنفيذ برنامج آلة حاسبة بسيطة مكون من : 
textboxes -‏ 2: لإدخال الأرقام 
- 1 ×b0اءاامنسدل:‏ يحتوى على هذه القيم :جمع » طرح» قسمة »> ضرب 


اكتب الكود حيث حسب الاختيار فى ال×0طاء| ستتم عملية الحساب بين الأرقام فى ×0طا×م† 


ستستخدم العمليات الحسابية التالية: 
الجمع +4 

الطرح - 

اال % 

القسمة / 


راع التعريفات الازمة للمتغيرات المستخدمة و طرق التحويل بينها و ذلك لأن القيم كلها رقمية. 

2- اجعل قائمة بأسماء أفلام 4 فی متغیر متعدد المحتوى Arra¥‏ و هذە القائمة هى المراد تأجير ها 
> بفرض أن كل فيلم سعره 3 جنيهات » اعرض المجموع الكلى لسعر الأفلام و عدد الأفلام فى 
القائمة فی اط ه| » و اعرض اسم کل فیلم و سعرہ فی اعطه| آخر و حاول آن یکون اسم کل فیلم و 
سعره فی سطر خاص به. 
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برنامج متكامل فى لغة الفيجوال بيسك 
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1.إنشا مشروع جديد 
سنحاول التعرض لبعض العناصر التى تم شرحها سابقا من خلال مشروح تصفح صور. 


انشا مشروعا جديدا › افتح البرنامج من قائمة البداية الخاصة بویندوز ں٣٥" ٣٤‏ ھ†کثم اكتر من 
Microsoft Visual Basic 2010 Express galijıprograms‏ 


MyFirstVBApp دıدجئاl‎ جمliربll‎ awl Windows Forms Application pî New Project رتخl‎ 


New Project ا‎ 
Recent Templates Sort by: | Default ¥ HE search Installed Templates 
Installed Templates 


1 Type: Visual Basi 
. 3 B| Windows Forms Application Visual Basic eT 
2 û project for creating an application with a 


e VE Windows user interface 
Online Templates أ‎ 8) WPF Application Visual Basic 

SM Lonsole Application Visual Basic 

وكا 


2 Class Library Visual Basic 


WPF Browser Application Visual Basic 


WindowsApplicationd 


TE EET 
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1. اذهب إلى ×مطامه۲ على يسار النافذة لتظهر لك › اختر من قسم ١۲ع"‏ اهمه العنصر 
TableLayoutPanels‏ 
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E All Windows Forms 


sEqE3EI Ez 


k Common Controls 
| 4 Containers 
lk Pointer 
8 ê FlowLayoutPanel 
ار‎ GroupBox 
a Panel 
8 SplitContainer 


TabControl 


5 Menus & Toolbars 


` þ Visual Basic PowerPacks 


 heneral 


Add Column 

Addl Row 

Remove Last Column 
Remove Last Row 


Edit Rows and Columns... 
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2. اذهب إلى نافذة وع امم هم فى الجانب الأيمن من الشاشة و تأكد من اختيار 
1|اeLayoutPaneاrab‏ کما فی الصورة 


Properties 


tableLayoutPanell System WindowsForms.Tab... 


إذهب إلى الخاصیية )عم فی liفذة‏ اpropertiesÛ‏ و تأكد أنها غير مفعلة pî None‏ اضغط علی 
السهم الظاهر لتظهر لك قائمة بها مبر عات > اختر المربع الأو سط ليظهر لك الاختيار ||آ؟ كما فى 


Properties 


tableLayoutPanell System. Windows.Forms.Tab... 


lal ıa 


ContexstMenuStrlp (none) 
CUrSOF Default 
Dock Fill 
Enabled E 
E Font 
ForeColor 
Generate Merri bêr 
GroWwStyle 


Dork 


Defines which borders of the control are bound 
to the container. 


وظيفة ام٣‏ ة۴ †uمرهاءاطه۲‏ كما وظيفة الجدول فى الورد حيث تتكون من أعمدة و سطور » و كل 


Add Column 


3. اذهب ا نافدة التصميم و اختر Add Row‏ 
ا اeLkayoutPAneاrab‏ لتجد سھم علی یمین _ nolo‏ 
العنصر فى الأعلى اضغط عليه ثم اختر الع 


Columns and Rows‏ کما فی الشکل: 
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ستظهر لك نافذة sعاy†؟S column and Row‏ تأکد من التعلیم علی ۳۸1 ںاه٤‏ و اضبط حجمه 
ب%15 و 02 uاco‏ ب%85 »› و كذلك R0W1‏ ب%90 و ۸0W2ب%10‏ ۰ تم اضغط )ہ 


Column and Row Styles 


Shon فا‎ 


Member Size Type Value O Absolute 


Lolurmnd Percent 50.000 3% @ Percent 


Lolumn#d Percent S0. OOO Fé : 
TT AutoSize 


0 Lolumn and row spanning: 
If you want a control to span multiple rews or 
columns, set the RowSpan and ColumnSpan 
properties on the control. 


4. اذهب إلى نافذة التصميم و اختر من ال×0طامه] العنصر اما†مCo٤ء Pictur‏ (عن طريق 
الضغط عليها مرتين) › سيتم إضافة العنصر فى أول خانة على اليسار فى الأعلى. 


اضغط علی السهم الموجود فى أعلى العنصر المضاف ام٣٤ Co‏ مء ںام أتظهر لك قائمة اختر 
Dock in Parent Container‏ 


Forml.vb [Design]" X 


Lhoose Image...‏ ن 


amene ramanen SIZE Mode: No FTA | 


DUoack ın Parent Lontalner 


تأكد أن الخاصية )عم فی نافذة العام مہم محتواھا ۴ء ثم اذهب إلى anمCcolumnS,‏ 
غيره إلى 2 »و غير عاrS†y Borde‏ ۴×43 لإظهار العنصر حتى لو فارع. 


ا اا 0 ا 
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5. اضف ×٥طا)c٥طc‏ من ال×ہطامہ] عن طریق ضغطتین متتالتین بالماوس علی 
العنصرلتضاف إلى أول خانة فارغة و هى الخانة السفلى على اليسار (لأن الخانتين العلويتين 
مشغولتین بال×٥‏ طعا ںا‌ام). 


قم بتغيير خاصية ×ع] ألى "مدد". 


6. اذهب إلى ال×هطامه] مرة أخرى و اختر من مجمو عة ء٣6‏ اهمع العنصر 
اyoutPane ۴W‏ لتضاف إلی آخر خانة › ثم اضغط على السھم و اختر Dock in‏ 
parent container‏ 


وظیفة ع you † P2‏ ھا W٥ا۴‏ انها من الممکن أن تحتوی على عناصر آخری لترتبها فى صفوف 
نظلمت eT‏ مساحتها يمكنها أن ترتب محتو یاتها فی سطور ¢ سنستخدمها هنا فی احتو اء 4 
ازرار. 


7. لإضافة الأزرار: 

وطu‎ ا٥۸1 تم إذهب إلی ×ەطامه† و أضف 4 آزرار(‎ ۴اwاayou†‎ Pa "€1 اختر‎ e 
. FlowLayoutPane| Jآذ لیتم إضافتھم‎ )button4 و‎ button3 وbutton2‎ 

ه غير ال†×ع† فى نافذة را ممم لزرار الأول ل" أظهر الصورة" و الثانى ل"امسح 
الصورة" و الثالث ل"اضبط لون الخلفية" و الرابع " أغلق". 

٠‏ يمكنك تغيير ترتيب أماكن الأزرار » إذهب إلى خاصية امال سه|ا؟ الخاصة 
باayoutPaneاwا۴‏ و اختر 01e‏ ۲طعRi‏ لتكون محاذاة الأزرار من اليمين إلى اليسار. 

علم بالماوس على زر "أغلق"' › ثم اضغط على زر ا٣٤‏ فى لوحة المفاتیح باستمرار ثم علم 
على بقية ال3 أزرار » تم اذهب إلى نافذة Formivot EET‏ 
properties‏ ثم autosize‏ و غیرها 
لهu٣۲‏ ليتم ضبط حجم الأزرار تلقائيا- سسس سسس س ر 


| ددنت‎ TITITITITITITITIT. انط | ن‎ ATITITITITIT." ددنت نتا | ابد‎ TITITITIT. 
IEEE TENT HEE: 4 ا3ا‎ 
3 ا‎ 1 . : 
امسح الصورة أا اضبط لون الخلفية ذا‎ ٠١ أظهر الصورة‎ 
1 
» 0 
ل 1 ا‎ 2 


الدرس السادس أول برنامج 


Microsoft Visual Basic 2010 Expressİ J مقدمة‎ 


algoharism.blogspot.com 


3. عير أسماء العناصر 
الكود» سنبدأً فى تغيير أسماء الأزرار »› اختر زر "أغلق" بالماوس ثم اذهب إلى خاصية (م۳ه") و 
غیر ھا إلی ٣٥††ں‏ 8٥ءه٥اع‏ و قم بالسابق مع زر "أظهر الصورة" ل 0۸ا 8u‏ h0Wء‏ و "'امسح 
الصورة' لہ ہ†٤† u‏ arBء‌اع‏ و "اضبط لون lllفية"‏ | backgroundButton‏ . 


الرس الان ب رل ا ٠‏ 
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4.اضف مربعات الحوار 
مربعات الحوار sم×80عه‏ ها0 سنستخدمها لفتح ملف الصورة الذى نريد عرضه بالإضافة لاختيار ‏ 
ول وا 


1 اذهب إلى ×هطامه] و اختر من مجمو عة ماھ¡ العنصر و ضز OpenFileDialog‏ و 
8 اorDiaاCo‏ لیظهروا کالاتی: 


اختر g1‏ 0|اھeD¡i|اOpenf¡i‏ و فى rtiesممoام‏ ستجد ۴|٥۲‏ اكتب السطر التالى فيها: 


*.* | (*.*) کل الملفات | مہ ط.* | (pہط.*)‏ ملفات B N۴‏ | عہم.* | (عngمp.*)‏ ملفات NG‏ ۴ | عمز.* | (چpز.*)‏ ملفات JPEG‏ 


و فى خاصية ٥|†|آ:‏ اختر ملف صور 


ij Open 3 


GG: 


@ Recently Changed 
| EE Uesktop 

Recent Places 
jl Computer 


E Pictures : 
EB Music ےه 1 د‎ 1 
| 0 . 
= 
8 ile Folder 


E Searches [ 
ى‎ filter 
التكو بد‎ 
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5.بدأ فى كتابة الكود 


هنا سيت كتابة الكود الخاص بالعناصر: 


1 سننیداً من show Bu t0٣‏ » سنذھب الی نافدة التصميم و نظغط بالمارس ضغطتين على 
show Button‏ "أطهر الصورة" لننتقل إلى نافذة التكويد» سنكتب الكود التالى: 


Formil.wb* e O * 
3 E Private Sub showButton_ Click{( j} Handles showButton . Click 5 
1 ق‎ 
5 '" Show the Open File dialog. If the user clicks Ok, load the 
6 '" picture that the user chose. 
7 
3 If OpenFileDialogl. ShowDialog( j = DialogResult.OK Then = 
3 
18 PictureBox1. Load (OpenFileDialog 1. FileName j 
11 > 
12 End If 
13 
14 
15 End Sub 
16 
17 | Emd Class ِ 
18 

100% x» 4 | 1 ٢ 


ای فى حالة أن المستخدم اختار ملف من خلال چہاھi ٥0‏ ا۴عم0 و ضغط زر )0 سیتم تحمیل 
ھذا الملف فی مربع 8B0×1عrںاc¡٥.‏ 


2 اذهب إلى نافدة ال لتصميم و اضغط على زر clearBut†٥۸‏ "امسح الصورة" تم اضغط 
ضغطتين متتالتين لتذهب إلى نافذة الكود و اكتب: 


PIELVALE SUD CIESTEUCTON CIICER(), HANOLGS CIESTEULCEOR.CEICEK 
' Clear the picture. 
PIctuUreBoxl. Image = Nothing 


ENd Sub 
و معناه أن يتم عرض لاشئ فى مربع الصورة عند الضغط على الزر.‎ 
اضبط لون الخلفية":‎ " ack ground But †0 ۸ و فی‎ 3 
PELVALE SUS DOCROTFOUROEULLON CIICEF BHaNOLES DaCKEGTOUNOEUCTLORNS CITE 


' Show the color dialog box. If the user clicks OK, change the 
'' PICÙUFEeBOS CONCEOL'"S BackKoOFOUNC to: the. COLOE thé USF chose: 


LE COLOEDLALOGL.ShOWDLalOgG() = DlialooRESULT.OK Then 
PLCEUECBORI.BACKCOLOE = COoOlLOFEDLALOGOL.TCOLOE 
ENG IE 
ENO SUb 
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يمكنك من اختيار لون خلفية مربع الصورة حسب اختيارك فى 1ع0اه۲0iهاه).‏ 
4 سر فی close Bu††0۸‏ "أغلق"': 


FEIT Up CIOSEEULLON CIICE). HENCOLEES CIGOEEBULCLOM CLICE 


' Close the form. 
Close () 
End SUb 


` checkbox J١آڎA‎ y 5 


FEIVOLE SUD ChECKEOSL CHECKEGCRANGTEC(, HENLE CheCRKEOKl.CHECKEICHANIEQ 
' Tf the user selects the Stretch check box, change 
' the PictureBox's SizeMode property to "Stretch". 
" 6leêrS5 The Check Dox, Change 1C to "Normal", 
lf CheckBoxl1l.Checked Then 
PICEUEFEBOXL.SI1ZEMode 


El 
PICLUrFEBOxXl.SIzZEMOdE. = PICTUFEBOxXSI1IzZEMode :NOoOrMa lL 


End II 
ENC ‘Sub 


TE thé USéFf 


= PictureBoxSizeMode.Stretchlmage 


و وظيفته عند التعليم فيه سيتم تمديد الصورة المعروضة بحجم النافذة. 


الآن انتهينا من كتابة الكود للبرنامج الأول فى الفيجوال بيسك ابداً فى تجريب البرنامج من خلال ۴5 
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6.خراج البرنامج مستقل 
کے فو اک ا کی کی ا کا کے در نے مل کا مار کا خرن درن 


أسرع طریقة ھی بعد الانتھاء من البرنامج نذھب إلى قائمة dااںB‏ ثم طوزاطںم اتظهر لنا نافذة 


Publish Wizard 


Where do you want to publish the application? 


specify the location to publish this application: 
CUsersiAlgohar Desktop" 


You may publish the application to a web site, FTP server, or file path. 
Examples: 

Uisk path: cA deployimyapplication 

File share:  Aserverimyapplication 

FTP server: ftp://ftp.microsoft.comymyapplication 


Web sitet http: fwumw.microsoft.comymyapplication 
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EET 
بالبرنامج‎ 


Assembly Information 


Title: WindowsApplicationZd 
Description: 

Company: 

Product: WindowsApplicationZ 
Copyright: Copyright & 2011 
Trademark: 

Assembly version: 1 4 4 0 
File wersion: 1 0 0 0 
GUID: fFO4AFO6b-acda-4a88-Bfa5-0519381 dc293 
Neutral language: [None] 

O] Make assembly COM-Visible 
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Application type: Icon: 
(Default Icon] 


Assembly Information... 


Enable application framework 


Windows application framework properties 
Enable XP visual styles 

[| Make single instance application 

Save My Settings on Shutdown 


fiıuıthentication rmode: 


Application 
Lormpile 
Debug 
References 
Resources 
Settings 
Signing 

ly Extensions 
Security 


Publish 


بعد الانتهاء يمكنك الذهاب إلى 
هذه القائمة لنشر البرنامج. 


اذهب ال مسار الملف الذي 


حددته سيكون هناك جمیع 


الألملحقات 


LlNE 
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تحديد المشكلهة. 

تحديد المخرجات. 

تحديد المدخلات. 

اهمال الببانات الخير ففدة فى حل المشكلة. 
تحديد خطوات الحل (العمليات). 

کتابة 1۳٤1٣ت‏ واش الحل. 


ax*+bx+c=0Û 
معادلة من الدرجه الثانية‎ 


تحديد خطوات حل المعادله باستخذام الخوارزه 
لها بان جد ی المعادله٠‏ 


x1,2= (-b š (b2-4ac)*.5) / (2 a) 


3121 


(1) تحديد المشكلة: ايجاد جذری المعادلة. 

(۲) تحديد المخرجات: طباعة 2× ,1× 

(۳) تحديد المدخلات: ع ,ظط ,ك. 

)٤(‏ إهغال البيانات العير مفيدة في حل المشكلة: 
لا يوجد. 


() تحديد خطوات الحل: 
حساب قبمه المميز أسفل الجذر | 
M=b*“-4 ac‏ 

- اختبار قیمه N‏ : 

اذأ كائت سنالية إ3 المعادلة ليس لها حل. 
اذا گائت تساوى صفر إذا يوجد جذر واحد. 
إذا كانت القيمة موجبه إذا هناك جذرين للمعادلة. 


ال2 كاك 


)٦(‏ کتابھ Algorithm‏ الحل: 

- ادخال قيم المعاملات ع ,ط ,ج. 
حساب المميز 0. 

- اختبار قيمته. 

2 حشاب قيمة جذرى المعادله X1, x<2‏ 
- طياعة الناتج 2× ,1×. 


هناك طرائق عديدة نذكر منها: 
۾ نمودج |٥۴0‏ 
8# خرائط التدفق. 
8 سودوکود. 


ال2 كاك 


ھ جدول : ج يضم تحليل 


ax*+bx+ce= 0Û 
معادلة من الدرجة الثاني‎ 


ا عداد PO n‏ الذي بو ضیح المدذخلات 
والفعالجة والفخر 


E علا بان جذر ق‎ 
x1,2= (-b š (b2-4ac)*.5) 1 (2 a) 


1 لاغ كاك 


ب خساپ قيمة المدیز: ج و 4 “ر = a, by € N1‏ 
هل 1 اقل من صفر إذا لا يوجد حل 


3 تساوي صفز إذا هناك جذر 
ولهد للمغادلة: ج 2)] / طا - X=‏ 


-هل 1أكبر من صفر إذا يوجد للمعادلة 
ا جفرين: 
د 3 / x1 = b+ a*0‏ 
XZ = Lb - (PAdacj* 0.5) / (3 a)‏ 


هي عبارة عن تمثيل تخطيطي» يوضح 
بښنهولة ترتیب خطوات حل المشكلة تدعا 
من ادخال البيانات» تم تحدبد العملبات 
الحسابية والمنطقية» وصولا للمخرجات 
الئي تمثل حل المشكلة. 


ال2 كاك 


Flow LINE sاغالا خط‎ 


Reference Jiaت'لî‎ jÎ رمز الربط‎ 


رمز اضافة تعليق 1104101 ۸ 


ال2 كاك 


8 بساطة ووضوح الخريطة لسهولة تتبع خطواتها. 
الاتجاه الافتراضي لأشكال الخريطة من اليسار 
إلى اليمين ومن أعلى إلى اسقل. 

رهر العملبات يخر ج فته خظ اتجاه وأحد فقط. 
شكل اتخاد القرار بدخل له خط اتجاه واحد 
وتخرج مله خطان (نحم / #). 


الرمز الطرفي للبداية له خط اتجاه واحد خارج 
والعكس في الرمز الطرقي للشهاية. 

يفضل استخدام رمز اضافة تطيق مع اشكال 
الخريطة التي تحتاج توضبح,. 

يستخدم رمز الربط أو الاتصال إذا كانت خريطة 
التدفق كبيرة وتحتامج أكثر من صفحة. 

بعد رسم خريطة التدفق يفضل تتبع جميع مساراتها 
واختبارها بقيم افتراضية معروف نتانجها. 


ال2 كاك 


قمثل ضرؤرة قبل كتابة البرامج الكبيرة. 
تمثل أحد أشكال توثيق البرنامج. 
تضع تضنورا كاملا لحل المشكلة وتساعد في تتبع مسارها. 
تساعد في عدم تكران ا أجزاء معينه في الرسم أو البرمجة. 
١‏ الأشكال المننتخدمة في رشم خرائط التدفق لها مدلول 
واحد لدى جميع المتعاملين معها. 
ا ف شين ایر ا الأخطاء . يبسىهولة. 
تساعد في تطوير وصيانة البرامج. 


8 قد تبدو الخريبطة معقة للمشكلذت الكبيرة. 


8 ابعض التعديلات في _البرنامج قد يؤدي لإعادة 
رسم الخريطة. 

8 أحيانا تشكل نخ خريظطة التدفق صعوبة كبيرة. 

8 الوقوع في بعص التفاصيل التي تبعدنا عن الحل. 


ال2 كاك 


ax“ +bx+c =0‏ 
معادلة من الدرجة الثانية 


رسم خريطة التدفق التي توضح خطوات حل 
معادلة من الدرجة الثانية. 


علما بان جذري المعادلة: 


x1,2= (-b + (b2-4ac)^.5) / (2 a) 


ال2 كاك 


ارسم خريطة التدفق التي ندخل لها درجه الحرارة 
الفهرنهايت فيتم تحويلها إلى ما يناظرها بدرجة 
الحرارة الملوبه. 


علما بان قانون التحويل هي؛ 
C= (519) (F = 32)‏ 


1 لاغ كاك 


ارسم خريطهة التدفق لحساب حاصل جمع أول ١‏ 
عدد فردى من الأعداد الطبيعية. 


وذلك كما يلي: 


Sum=1 + 3F+ L.A 


ال2 كاك 


طريقة لعرض خطوات حل 
المشكلة الىك بدن مله مختصر هده 
قريبة من لغات البرمجة. 


۾ الكلمات: وهي تمثل الأفعال المطلوب 
فيد ھا ھل: )opښS‏ - „(Calculate - Print - Read‏ 

8 الجمل: تشرح المطلوب القيام به مثل: 
Calculate SUM of two NUmMbeFS‏ 

8 مقاطع: والتي تمثل وحدة واحدة تضم عدة 
جمل منل: ۴| .B|ock‏ 


1 لاغ كاك 
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بحيث تعبر عن محتواد. 


1 كتا الأوامر فی وره خطوات سهلة 
وبسيطهة وواضحه. 


8 تتمیز "سودوکود" بانها: 
- سهلة الفهم, 
= ل تستحدم رهوزا خاصة. 
ت لا تخصضع لقواعد صعبة أو فكد ة, 
- سهلة التحويل لبرنامج باي لغة برمجة. 
1 و خد ا "سو لو کو د۰ 
- قد نكو طويلة بعص الشيء خاضصة في المشاكل المعقدة. 


ال2 اك 
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ax“ +bx + C= Û 
معادلة مر الدرجة الثانية‎ 


كتابة سودوکود يوضح خطوات حل معادلة 
من الدرجة الدانيه. 


علما بان جذري المعادلة: 


x1,2= (-b š (b2-4ac)^.5) / (2 a) 


(1} input Values: raad a, b, 
(2) Calculate mı, Where It given by: 
calculats m = b®* = {a û 
[3} Datect mi vale: 
If m lasg than Zero then 
print “No Roots" 
Else If m Equal Û thêrî 
calcülatê x = - b | (2 )3ھ‎ 
Print “xX mx my 
êk ê 
calculate x1 = (=-b + (b24a). (23| 
ka = (-b - (b2 -dac "5) (2 )ھ3‎ 
Print Cl, a 


etd lf 
(4) Stop processing 


بعل رف رمات (لہہونہ: 


http://algoharism.blogspot.com/search/la bel /كتب‎ 
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